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Preface 



This publication contains descriptions of 
major data areas and control blocks used by 
the three major components of VH/370. The 
three components are: 

• The Control Program (CP) 

• The Conversational Monitor System (CMS) 

• The Remote Spooling Communications 
Subsystem (RSCS) 

There are three sections and five 
appendixes, as follows: 

• "Section 1. CP Data Areas and Control 
Blocks" contains information about CP 
data areas and control blocks. 

• "Section 2. CMS Data areas and Control 
Blocks" contains information on CMS data 
areas and control blocks. 

• "Section 3. RSCS Data Areas and Control 
Blocks" contains information on RSCS 
data areas and control blocks. 



"Appendix A. CP and RSCS Equate Symbols" 
contains assembler language equate 
symbols used by CP and RSCS to reference 
data. 

"Appendix B. RSCS Control Areas" 
contains RSCS control areas that define 
constants and variables used during 
execution. 

"Appendix C. RSCS Request Elements" 
contains RSCS request elements that are 
the tables used by RSCS for task-to-task 
communication. 



"Appendix D. CMS Equate 
contains CMS equate symbols. 



"Appendix E. Data Areas and Control 
Block References" contains information 
on the modules that reference data areas 
and control blocks. 



OTHER VH/370 DATA AREAS AND CONTROL BLOCKS 



Some data areas and control blocks that 
affect VM/370 service and support programs 
are not included in this publication. 
Information on these data areas and control 
blocks can be found in the IBM Virtual 



Mac h ine Fa ci lity /370: Service Routines 
Pro gram Logic, Order No. SY20-0882. 



RELATED PUBLICATIONS 



This publication 
conjunction with: 



should be 



used in 



IBM Virtual Machine Facility/ 370: 

System Lo gi c an d Problem Determination 
Guide, 

Vo lu me X Control Prog ram (CP) , Order 
No. SY20-0886 

V olu me 2 Conversation al Monitor System 
(CMS) , Order No. Sy20-0887 

Y.2iM£ 3 Remote Spooling Communication 
Syb*system~(RSCS) , Order No. SY20-0888 

System Programmer's Guide, Order No. 
GC20-1807 



Gloss ary and M as ter Index, 
GC20-1813. 



Order No. 



For information on how to use the fourth 
component — interactive problem control 
system — and its facilities, the hardware 
and software support personnel or the 
installation system programmer should use: 

IBM Virtual Machine Fa ci lit y/3 7 : 
Interactive Problem Co n trol System (IPCS) 
Osiris Guide, Order No. ~GC20- 1823*7 



Symbols" HOW TO OSE THIS POBLICATION 



This publication addresses and describes 
the major control blocks associated with 
CP, CMS, and RSCS. Generally, data areas, 
or scratch areas that are created and exist 
only during the execution of a particular 
module are not described in this 
publication. In this publication, the data 
areas and control blocks are arranged in 
alphabetical order by DSECT name. 

The CMS and RSCS components operate 
under control of CP. Each component 
creates, updates, and erases its own 
control blocks and data areas. 



Preface iii 
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Control blocks and data areas are blocks 
of related information applicable to one or 
■ore system functions. , They are usually 
defined by the DSECT instruction- . The 
blocks can reflect current status, history 
information, or combinations of both, 
applicable to 7M/370 functions- Control 
blocks and data areas provide the linkage 
and information for the user, the hardware, 
and the programs to work as one entity for 
the successful execution of a job, task, or 
process. 



For every data area or control block, a 
statement is given that defines the use of 
the data area or control block. This 
statement is followed by a formatted block 
showing the fields defined in the data area 
or control block and the displacement into 
the DSECT of that field. 

The formatted blocks for CP and CMS 
control areas are 8 bytes wide, showing two 
fullwords per line. RSCS control blocks 
are 4 bytes wide. 

Note: One exception to this width rule is 
the formatting for PSA, where the control 
areas are given in 16-byte width. 



When the na 
fit into the 
the definition 
of the name 
usually takes 
there is a pa 
that uses more 
the formatted 
the block to s 
this field is 
the block. 



me of a field is too large to | 
formatted line, a pointer to j 

of the field is used instead 
of the field. This pointer 
the form A*1, A*2, etc. When 
rticularly large field (one 

than three or four lines of 
block) , ellipses are used in 
how that the displacement of 

larger than can be shown in 



The use of slashes in a field indicates 
that the field is reserved for IBM's use. 

The formatted block is followed by 
listing-related information such as the 
hexadecimal displacement of the field into 
the DSECT, the name of the field and its 
definition in the listing, and a brief 
description of the contents and meaning of 
the field. 



The following terms in this publication, 
refer to the indicated support devices: 

• "2305" refers to IBM 2305 Fixed Head 
Storage, Models 1 and 2. 

• "270x" refers to IBM 2701, 2702, and 
2703 Transmission Control Units or the 
Integrated Communications Adapter (ICA) 
on the System/370 Model 135. 

• "2741" refers to the IBM 2741 and the 
3767, unless otherwise specified. 

• "3270" refers to a series of display 
devices, namely, the IBM 3275, 3276, 
3277, and 3278 Display Stations. A 
specific device type is used only when a 
distinction is required between device 
types. 

Information about display terminal usage 
also applies to the IBM 3138, 3148, and 
3158 Display Consoles when used in 
display mode, unless otherwise noted. 

Any information pertaining to the IBM 
3284 or 3286 Printer also pertains to 
the IBM 3287, 3288, and 3289 printers, 
unless otherwise noted. 

• "FB-512" refers to the IBM 3310 and 3370 
Direct Access Storage Devices. 

• "3330" refers to the IBM 3330 Disk 
Storage, Models 1, 2, or 11; the IBM 
3333 Disk Storage and Control, Models 1 
or 11; and the 3350 Direct Access 
Storage operating in 3330/3333 Model 1 
or 3330/3333 Model 11 compatibility 
mode. 

• "3340" refers to the IBM 3340 Disk 
Storage, Models A2, B1, and B2, and the 
3344 Direct Access Storage Model B2. 

• "3350" refers to the IBM 3350 Direct 
Access Storage Models A2 and B2 in 
native mode. 



"370x" refers to IBM 3704 
Communications Controllers. 



and 3705 



The term "3705" refers to the 3705 I and 
the 3705 II unless otherwise noted. 
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ACCTBLOK, ACNTBLOK 

ACCTBLOK; USER ACCOUNTING BLOCK 

ACCTBLOK provides header information for spool files. The VMACOUNT field in the VMBLOK 
points to ACCTBLOK. 



10 



ACCTOSER 



ACCTACNO 



ACCTDIST 



Hexadecimal Field 
Displacement Name 





8 

10 



ACCTOSER 


DS 


CL8 


ACCTACNO 


DS 


CL8 


ACCTDIST 


DS 


CL8 



Field Description, Contents, Meaning 

Virtual machine identification 
Virtual machine accounting number 
Virtual machine distribution number 



ACCTLENG EQO (*-ACCTBLOK) /8 Size of ACCTBLOK in doublewords (X'OS 1 ) 



ACNTBLOK: ACCOUNTING CARD BDFFER BLOCK 

ACNTBLOK provides accounting and statistical information on each user that has used 
VM/370 facilities. The ARSPAC field in the Prefix Storage Area (PSA) points to the start 
of the chain of ACNTBLOKs. 



I 



ACNTNEXT 



ACNTDATA 



50 | 



ACNTBACK 



Hexadecimal Field 
Displacement Name 




4 


ACNTNEXT DS 
ACNTDATA DS 


F 
CL80 


54 


ACNTBACK DS 


F 




ACNTSIZE EQD 


(*-A 



Field Description, Contents, Meaning 

Address of next ACNTBLOK in chain 

Accounting information (see "Format for User 

Cards") 
Address of previous ACNTBLOK in chain 



(♦-ACNTBLOK) /8 Size of ACNTBLOK in doublewords (X'OC) 
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ACNTBLOK 

• Format for User Cards 

The fields below represent the 80 bytes defined by ACNTDATA in the ACNTBLOK data area. 



ACNTUSER 



8 
10 
18 
20 
28 
30 
38 
40 
48 



r " - ' ■ 

| ACNTUSER (cont.) 




1 


ACNTNUM | 


I ACNTNUM (cont.) 




1 

ITSTOP 






AC1 




! ACNTCONT 




! 


ACNTTIME | 


| ACNTVTIM 




1 


ACNTPGRD | 


I ACNTPGWT 




1 


ACNTIOCT | 


| ACNTPNCH 




1 


ACNTLINS | 


| ACNTCRDS 




1 /////////ACNTRSV 1///////////// I 


I/// ACNTRSY1 (cont. 


1 //// 1 /////////ACNTRSV2///////////// f 

• 


I ///////////// I ACNTCODE 


I 





Hexadecimal Field 
Displacement Name 







ORG 


ACNTDATA 


I 4 


ACNTUSER 


DS 


CL8 


I c 


ACNTNUM 


DS 


CL8 


| 14 


ACNTSTOP 


DS 


CL12 


I 20 


ACNTCONT 


DS 


1F 


I 24 


ACNTTIME 


DS 


1F 


| 28 


ACNTVTIM 


DS 


1F 






ORG 


ACNTTIME 


j 24 


ACNTDEVC 


DS 


VT ll 

&H1 


I 28 


ANCTNCYL 


DS 


1H 


I 2C 


ACNTPGRD 


DS 


1F 


I 30 


ACNTPGWT 


DS 


1F 


I 34 


ACNTIOCT 


DS 


1F 


I 38 


ACNTPNCH 


DS 


1F 


I 3C 


ACNTLINS 


DS 


1F 


I 40 


ACNTCRDS 


DS 


1F 


I 44 


ACNTRSV 1 


DS 


2F 


I 4C 


ACNTRSV2 


DS 


XL6 


I 52 


ACNTCODE 


DS 


1H 




Card Codes for 
~DC 


ACNTCODE 
C»C0» 






DC 


C*x1» 






DC 


C»x2» 






DC 


C'x3« 



Field Description, Contents, Meaning 



Virtual machine identification 
Virtual machine accounting number 
Date and time of accounting mmddyyhhss 
Number of seconds connected 
Milliseconds of processor time used 
Milliseconds of virtual processor time used 



Device code (CTFM) ; see the DEVTYPE copy file 
Number of cylinders of T-disk space 

Total page reads 

Total page writes 

Virtual SIO count for nonspooled I/O 

Virtual card count for spooled punch 

Virtual line count for spooled printer 

Virtual card count for spooled reader 

Reserved for IBM use 

Reserved for IBM use 

Accounting card identification code 



User formatted accounting card 
User virtual machine accounting card 
User dedicated device accounting card 
User temporary disk space accounting card 



where: 

x = C if the card is initiated via a DIAGNOSE Code X f 4C' 

x = if the card is initiated via CP command processing 
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ACTIBLOK 

ACTIBLOK; ACCOONTING INFORMATION BLOCK 

ACTIBLOK contains the user information specified in the SYSACHT macro as well as 
information about the current spool file that contains accounting records. 



1 — 




ACTIID 




i 


I A*1 


| A*2 | ACTILIMIT 


| ACTIDISP | ACTICNT 






ACTIBF1V 


I 


ACTIBF1R 






ACTIBF2V 


I 


ACTIBF2R 




L 


ACTIDCDR 


I 


ACTISFB 


i 



10 



18 



20 



Hexadecimal Field 
Displacement Name 



ACTIID DS 
ACTICLAS DS 
ACTIFLAG DS 



Field Description, Contents, Meaning 

CL8 Virtual machine identification 

CL1 A*1 Class of output line 
1X A*2 Accounting status flag 



Bits defined in ACTIFLAG 
ACTIPCH EQO ~ X T 80* 
ACTIAC EQO I 1 HO* 
ACTICL EQO X»20« 
ACTISFCK EQO X«10» 



A 


ACTILIMT 


DS 


1H 


C 


ACTIDISP 


DS 


1H 


E 


ACTICNT 


DS 


1H 


10 


ACTIBF17 


DS 


1F 


14 


ACTIBF1R 


DS 


1F 


18 


ACTIBF27 


DS 


1F 


1C 


ACTIBF2R 


DS 


1F 


20 


ACTIDCOR 


DS 


1F 


24 


ACTISFB 


DS 


1F 



Indicates punch files 
Indicates active 
Indicates file to be closed 
Indicates checkpoint taken 

Limit to close file 

Displacement in buffer of next record 

Count of records in buffer 

Virtual address of buffer one 

Real address of buffer one 

Virtual address of buffer two 

Real address of buffer two 

Current buffer DASD address 

Address of spool file block 
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ALOCBLOK 

ALOCBLOK: DASD CYLINDER ALLOCATION BLOCK 

ALOCBLOK provides information on the temporary disk space available to a virtual machine. 
The RDE7ALLN field in the RDEVBLOK points to the ALOCBLOK. 



ALOCPNT 



I ALOCOSED | 



ALOCHAX 



8 | ALOCNTMP I ////////////////////////////////////////// 



10 | 



ALOCMAP 



Hexadecimal Field 
Displacement Name 



Field Description, Contents, Meaning 

Pointer to next ALOCBLOK on chain 
Number of cylinders currently in use 
Maximum number of cylinders available 
Number of nontemporary cylinders 
Reserved for IBM use 

Cylinder allocation bit map 

Bits defined in ALOCMAP 

= Cylinder is available 

1 = Cylinder has been assigned 

Note: The size of ALOCMAP is variable and depends upon the number of 
cylinders on the device- Generally, the size of the ALOCBLOK is determined 
by the following formula: 






ALOCPNT DS 


1F 


4 


ALOCOSED DS 


1H 


6 


ALOCMAX DS 


1H 


8 


ALOCNTMP DS 


1H 


A 


DS 


3H 


10 


ALOCMAP DS 


OF 



ALOCSIZE(doublewords) = 

where: 

ALOCMAX for 2305-1 
for 2305-2 
for 2314 
for 3330-1 
for 3330-2 
for 3330-11 
for 3333-1 
for 3333-11 
for 3340-35 
for 3340-70 
for 3350 
for all others 



(ALOCMAX+63) 



* 2 = 



64 



No. of Cylinder 
Bits per doubleword 



♦ header 



48 cylinders 
96 cylinders 
203 cylinders 
404 cylinders 
404 cylinders 
808 cylinders 
404 cylinders 
808 cylinders 
349 cylinders 
698 cylinders 
555 cylinders 
1 cylinder 



Note that any bits in the map that represent cylinders not present on 
the device are set to 1. 



For Temporary Disk Allocation Blocks 



ORG 
ALOCCYL1 DS 
ALOCCYL2 DS 



ALOCOSED 

1H 

1H 



First cylinder of T-disk area 
Last cylinder of T-disk area 



Sites defined in ALOCMAP 
X'00* = Cylinder is available 
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ALQCSLOK 

X*AA* = Cylinder has been allocated 

Note: The size of the T-disk ALOCHAP is variable and depends upon the 
number of cylinders in the range AL0CCYL1 to AL0CCYL2. Generally, the size 
of a given block is determined by the following formula: 

(AL0CCYL2-AL0CCYL 1+1+7 ) 
ALOCSIZE(doublewords) = < — V +2 = 

Number of Cylinder (inclusive) ] 
v + header 

Bytes per doubleword j 
Note that bytes for cylinders that are not available are marked assigned. 
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ALOFBLOK, ALOFBLOK 

I ALOFBLOK; FB-512 EXTENT ALLOCATION BLOCK 

I The ALOFBLOK is used to control the allocation of temporary (TEHP) space on FB-512 

i devices. The ALOFBLOK also serves as the anchor (ALOFPNT) for ALOTBLOKs that describe 

I teaporary disk allocations. The RDEVALLN field of FB-512 RDEVBLOKs points to the 

| ALOFBLOK. 



8 I 



10 



ALOFPNT 



ALOFUSED 



ALOFMAX 



ALOFNTMP 



ALOFNUME 



ALOFRSV1 



One MAP entry per teaporary space extent 



MAP 



18-0 



20-8 



28-10 



1 


ALOFFRB 


| ALOFLRB 


T 




ALOFSTRT 


| ALOFEND 




I 


ALOFNUMA 


| ALOFRSV2 


_ J 



Hexadeciaal Field 
Displacement Naae 



Field Description, Contents, Meaning 

Pointer to first TDSK ALOTBLOK 
Nuaber of pages currently in use 
Maximum nuaber of pages available 
Number of nontemporary pages originally 

allocated 
Nuaber of extents reflected in sap 
Reserved for IBM use 

Extent map — each 20 byte entry reflects 
a contiguous group of pages (extent) 
that were allocated as teaporary space 

(♦-ALOFBLOK) /8 ALOFBLOK "root" size in doubletrords 

Pointer to first FB-512 RECBLOK for extent 

— points to itself if no RECBLOKs exist 
Pointer to last FB-512 RECBLOK for extent 

— points to ALOFFRB if no RECBLOKs exist 
Page nuaber of first page in this extent 
Page nuaber of last page in this extent 
Number of available pages in this extent 
Reserved for IBM use 

ALOFEXTZ EQ0 (*- ALOFFRB) /8 Extent Bap-entry size in doublewords 



t o 




ALOFPNT 


DS 


1F 


I 4 




ALOFOSED 


DS 


1F 


I 8 




ALOFHAX 


DS 


1F 


I c 




ALOFNTMP 


DS 


1F 


I 10 




ALOFNDME 


DS 


1H 


I 12 




AL0FRS71 


DS 


3H 


I 18 




ALOFMAP 


DS 


0D 






ALOFRTZ 


EQO 


(* 


I 18- 


-0 


ALOFFRB 


DS 


1F 


I 1C- 


-4 


ALOFBRB 


DS 


1F 


| 20- 


-8 


ALOFSTRT 


DS 


1F 


| 24- 


-C 


ALOFEND 


DS 


1F 


I 28- 


-10 


ALOFN0MA 


DS 


1F 


I 2C- 


■14 


ALOFRSY2 


DS 


1F 



6 IBM 7M/370 Data Areas and Control Block Logic 

Licensed Material — Property of IBM © Copyright IBM Corp, 1979 



Pg. of SY20-0884-3 Rev June 29, 1979 by Supp LD23-9035-0 for 5748-XE1 

ALOSSLOK,ALOSSLOK 

I ALOSBLOK; FREE TDSK SPACE EXTENT BLOCK 

| The ALOSBLOK is used to describe unused TDSK space on FB-512 devices. Space represented 
| by this control block is available for allocation as TDSK space. The ALOTPSDB field of 
| the ALOTBLOK points to the ALOSBLOK. 



I 

I 

8 I 



ALOSFPNT 



ALOSEND 



ALOSSTRT 



AL0SRS7 



i Hexadecimal Field 
I Displacement Name 



ALOSFPNT DS 


1F 


ALOSSTHT DS 


1F 


ALOSEND DS 


1F 


ALOSRSV DS 


1F 



Field Description, Contents, Meaning 

Pointer to next ALOSBLOK 
Page number of first page of free extent 
Page number of last page of free extent 
Reserved for IBM use 



ALOSSZ 



EQO 



(*-ALOSBLOK)/8 ALOSBLOK size in doublewords 



I liOTBLOK: FB-512 TDSK ALLOCATION BLOCK 

I The ALOTBLOK describes the original allocation of TDSk space on FB-512 devices, 
| ALOSBLOKs that map free space within the original extent are chained from the ALOTBLOK. 



8 I 

I 

10 | 



ALOTPNT 



ALOTEND 



ALOTNUMA 



ALOTSTRT 



ALOTPSDB 



ALOTRSV 



Hexadecimal Field 
Displacement Name 




4 
8 
C 
10 
14 



ALOTPNT 


DS 


1F 


ALOTSTRT 


DS 


1F 


ALOTEND 


DS 


1F 


ALOTPSDB 


DS 


1F 


ALOTN0MA 


DS 


1F 


ALOTRSV 


DS 


1F 



Field Description, Contents, Meaning 

Pointer to next ALOTBLOK 

Page number of first page of extent 

Page number of last page of extent 

Pointer to first ALOSBLOK 

Number of available TDSK blocks 

Reserved for IBM use 



ALOSSZ 



EQO 



(*~AL0TBLGK)/8 ALOTBLOK size in doablewords 
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BSCBLOK 

BSCBLOK: BINARY SYNCHRONOUS COMMUNICATION CONTROL BLOCK 

BSCBLOK provides status, control information buffers (necessary for polling and 
addressing) , and channel programs for 3270 remote equipment. The RDEVBSC field in the 
RDE7BL0K points to the BSCBLOK. 




8 
10 
18 
20 
28 
30 
38 
40 
48 
50 
58 
60 
68 
70 
78 
80 
88 



BSCSCCR1 



BSCSCCW2 



BSCSCCW3 



BSCPCCW1 



BSCPCCW2 



BSCPCCW3 



BSCPCCHU 



BSCECCW1 



BSCECCW2 



BSCUECCN 



BSCSEL 



I B*1 



B*2 | B*3 | BSCINDEX I//////////BSCRESVD/////////// 



BSCSPTR 



I 



BSCAUSER 



BSCUCOPY 



BSCRSTRT 



BSCCNT | BSCSENSE 



BSCRCVD | BSCSEND 



//////BSCUSER 1/////////// | 



BSCRROBN 



BSCTMRQ 



| BSCRESP 



BSCRE&D 
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CONTASK 

COST ASK: CONSOLE I/O PACKAGE 

CONTASK contains data and control information pertinent to the control and communication 
between virtual and real terminal console tasks and command streams. The RDEVCON field 
of the RDEVBLOK and the NICQPNT field of the NICBLOK point to CONTASK. 




8 
10 
18 
20 
28 
30 
38 





CONPNT I 


CONRETN | 


C*1 


C*2 | CONTSKSZ I 


CONUSER | 


C*3 


C0NRSV1 | 


CONRSY2 | 


C0NCCW1 ! 


C0NCCW2 | 


C0NCCW3 | 


C0NCCW4 | 




C0NDAT& 





(Variable Length) 



Hexadecimal Field 
Displacement Name 






CONPNT 


DS 


1F 


4 


CONRETN 


DS 


1F 


8 


CONSTAT 


DS 


1X 




Bits def 


ined 


in CONSTAT 




CONODTPT 


EQU 


X«80» 




CONRESP 


EQO 


X«40* 




CONACTV 


EQU 


X'20» 




CONCNTL 


EQO 


X'10' 




CONESCP 


EQO 


X'08« 




CONRTRT 


EQO 


X'04 ! 




CONSPLT 


EQO 


X«02« 




CONSYNC 


EQO 


X»01» 


9 


CONPARM 


DS 


1X 


A 


CONTSKSZ 


DS 


1H 


C 


CONOSER 


DS 


1F 


10 


CONFSS 


DS 


1X 




Bits defined 


in CONFSS 




CONALT 


EQO 


X'08« 




CONMOD 


EQO 


X«04' 




CONRD 


EQO 


X*02' 




CONWRT 


EQO 


X'01« 




CONFSOP 


EQO 


X«0F« 




CONEWA 


EQD 


X f 0D* 




CONRMOD 


EQO 


x'oe 1 




CONEWRT 


EQO 


X'05* 



Field Description, Contents, Meaning 

Pointer to next CONTASK 
Pointer to SAVEAREA for return 
C*1 CONTASK status control flags 



Generate CONTASK output 

Response expected from this CONTASK 

CONTASK is active on real device 

This is a control CONTASK only 

CONTASK contains device dependent data 

Retry operation in progress 

Output data being split via RDEVLLEN 

CONTASK for synchronization only 

C*2 DHKQCN parameter flags (see "Appendix A, 
CP and RSCS Equate Symbols") 
CONTASK size in doublewords 
Address of VMBLOK for destination user 

C*3 Flags for full screen support 



Set to 1 when ERASE/WRITE ALTERNATE operation 

Set to 1 when modified operation 

Full screen read 

Full screen write 

Any full screen operation 

ERASE/WHITE 1LTERN1TE operation 

Read modified operation 

ERASE/WRITE operation 
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COHTASK 



Hexadecimal 


Field 






Displacement 


Name 






18 


CON can 


DS 


1D 






ORG 


CONCCW1 


18 


CONADDB 


DS 


1F 


22 


CONFLAG 


DS 


1X 


23 


CONDCW 


DS 


1X 


24 


CONCNT 


DS 


1H 






ORG 


CONADDR 


18 


CONCOMND 


DS 


1X 


20 


CONCCW2 


DS 


1D 


28 


CONCCW3 


DS 


1D 


30 


CONCCW4 


DS 


1D 


38 


CON DAT A 


DS 


OC 



Field Description, Contents, Meaning 
First console I/O CCH 



CCW data address 
CCW flag bits 
Diagnose write control 
CCW byte count 



CCW command code 

Second console I/O CCW 

Third console I/O CCW 

Fourth console I/O CCW 

Output data area (variable length) 

CONTSIZE EQU (*-CONTASK) /8 CONTASK size in doublewords 

2i£§ Efs^efined in CON CCW for 3 7 Ox Network Control P rogra m 
ORG CONCCW3*2 

Source identifier 
Destination resource ID 
Request tag for this CONTASK 
370x system response byte 
370x extended response byte 
Bisynchronous terminal command modifier 
Basic device function control flags 
Basic device data control flags 
Text data length 



Return index value 

Start text character 

Escape character 

Command code for remote station 

Write control character 

Start buffer address 

Buffer address 



2A 


CONSRID 


DS 


1H 


2C 


CONDEST 


DS 


1H 


2E 


CONRTAG 


DS 


1H 


30 


CONSYSR 


DS 


1X 


31 


CONEXTR 


DS 


1X 


32 


CONTCMD 


DS 


1H 


34 


COHFONC 


DS 


1X 


35 


CONDFLG 


DS 


1X 


36 


CONDCNT 


DS 


1H 




Bits redefined 

"org 


£°L 327 

CONCCW4 


30 


CONLABEL 


DS 


1X 


31 


CONSTX 


DS 


1X 


33 


CON ESC 


DS 


1X 


33 


CONCMD 


DS 


1X 


3H 


CONWCC 


DS 


1X 


35 


CONSBA 


DS 


1X 


36 




DS 


1H 
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DMPKYREC, DMPTBREC 



DHPKYREC: DUMP FILE KEY STORAGE RECORD 



DMPKYREC contains the storage keys of each 2K block of main storage at the tiie of SVC 
or a PSH restart condition. DMPKYREC and DMPIHREC are used for debugging operations. 



|S*1 | 



DMPKEYS 94096 bytes) 



Hexadecimal Field 
Displacement Name 



s 


DS 


4096X 




ORG 


DMPKEYS 




DS 


1X 



Field Description, Contents, Meaning 
Main storage keys 

S*1 Storage key for each 2K block 



DMPTBREC: DOMP FILE SYMBOL TABLE RECORD 



DMPTBREC is a listing of all entry points in the system and their locations. 



I 
I 

8 I 

I 

10 | 



DMPSYMVA 



DMPSYMNM 



DMPSYMEN 



Hexadecimal 
Displacement 



Field 






Name 






DMPSYMEN 


DS 


341XL12 




ORG 


DMPSYMEN 


DHPSYMNfi 


DS 


CL8 


DMPSYMVA 


DS 


A 



Field Description, Contents, Meaning 
Symbol table entries 



CSECT or entry point name 

Location in main storage of this symbol 
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ECBLOK 

ECBLOK : EXTENSION TO VMBLOK FOR YIRTDAL MACHINE WITH RELOCATE 

ECBLOK provides an extension to the VMBLOK for virtual machine operation in System/370 
extended control mode. The VMECEXT field of the VHBLOK points to ECBLOK. 




8 
10 
18 
20 
28 
30 
38 
40 
48 
50 
58 
60 
68 
70 
78 
80 
88 
90 



| EXTCR0 


| EXTCR1 | 

1 


| EXTCR2 


| EXTCR3 | 


| EXTCR4 


| EXTCR5 | 


| EXTCR6 


I EXTCR7 | 


| EXTCR8 


| EXTCR9 | 


| EXTCR10 


| EXTCR11 | 


| EXTCR12 


| EXTCR13 | 


| EXTCR14 


| EXTCR15 | 


| EXTSHCR0 


| EXTSHCR1 | 


| EXTSTOF 


| EXTSTOLD | 


| EXTHWMRK 


| X*1 | X*2 | EXTARCH | 


| EXTPERAD 


| EXTPERCD | EXTCOPY | 


I EXTCPTMR | 


| EXTCPTRQ 


I EXTCCTRQ | 


| EXTVPORL 


| EXTCSPT | 


| EXTSTOST 


| EXTOPTST | 


| EXTCSPTL | EXTSEGCM 


| X*3 | X*4 | EXTRS1 | 


| EXTAVT | 


| EXTVPFX 

i _ _ 


I ///////// EXTRS2 ///////// I 
1 



Hexadecinal Field 
Displacement Name 






EXTCR0 


DS 


1F 


4 


EXTCR1 


DS 


1F 


8 


EXTCR2 


DS 


1F } 


C 


EXTCR3 


DS 


1F } 


10 


EXTCR4 


DS 


1F } 


14 


EXTCR5 


DS 


1F } 


18 


EXTCR6 


DS 


1F } 


1C 


EXTCR7 


DS 


1F } 


20 


EXTCR8 


DS 


1F } 


24 


EXTCR9 


DS 


1F } 


28 


EXTCR10 


DS 


1F } 


2C 


EXTCR11 


DS 


1F } 


30 


EXTCR12 


DS 


1F } 


34 


EXTCR13 


DS 


1F } 


38 


EXTCR14 


DS 


1F } 


3C 


EXTCR15 


DS 


1F } 



Field Description, Contents, Meaning 

Virtual control register 0; architecture 

controls 
Virtual control register 1; segment table 

pointer 



Virtual control registers 2 through 15 
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ECBLOK 



Hexadecimal 


Field 








DisplaceBent 


Name 








40 


EXTSHCRO 


DS 


1F 




44 


EXTSHCR1 


DS 


1F 




48 


EXTSTOF 


DS 


IF 




4C 


EXTSTOLD 


DS 


1F 




50 


EXTHWMRK 


DS 


1F 








ORG 


EXTHWMRK 




EXTP0REL 


DS 


1F 




54 


EXTSTOMX 


DS 


1X 


X*1 


55 


EXTSTOCT 


DS 


1X 


X*2 


56 


EXTARCH 


DS 


1H 




58 


EXTPERAD 


DS 


IF 




5C 


EXTPERCD 


DS 


1H 




5E 


EXTCOPY 


DS 


1H 




60 


EXTCPTMR 


DS 


1D 




68 


EXTCPTRQ 


DS 


1F 




6C 


EXTCCTRQ 


DS 


1F 




70 


EXTVP0RL 


DS 


1F 




74 


EXTCSPT 


DS 


1F 




78 


EXTSTOST 


DS 


1F 




7C 


EXTOPTST 


DS 


1F 




80 


EXTCSPTL 


DS 


1H 




82 


EXTSEGCM 


DS 


1H 




84 


EXTCSCT 


DS 


1X 


X*3 


85 


EXTOSCT 


DS 


1X 


X*4 


86 


EXTRS1 


DS 


1H 




88 


EXTAVT 


DS 


1D 




90 


EXTVPFX 


DS 


1F 




94 


EXTRS2 


DS 


1F 






EXTSIZE 


EQO 


(*- 


ECBLOK) /8 



Field Description. Contents, Meaning 

Shadow control register 
Shadow control register 1 
Pointer to first STOBLOK on chain 
Control register 1 value corresponding to 

tables 
Virtual Machine ?V=VR high-water mark 



Relocated page table add for V=R user 
when STBYPASS is active 

Maximum number of STOBLOKs 

Current number of STOBLOKs 

Architecture control index 

Address of instruction PER interrupt 

PER code to be reflected 

Length code from active SEGTABLE entry 

Virtual processor timer 

Address of TRQBLOK for processor timer 

Address of TRQBLOK for clock comparator 

Relocated virtual page (diagnose code ' 6C) 

Pointer to common area for shadow page tables 

Number of STO (segment table origin) steals 

Number of page table steals 

Length of common area for shadow table 

extension 
Displacement of common area for shadow table 

extension 
Number of segments in common area 
Size of user area shadow page table placement 
Reserved for IBM use 

Accumulated virtual machine time for VMAIP 
Virtual prefix value 
Reserved for IBM use 

ECBLOK size in doublewords (X f 0E«) 
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ERRBLOK 



ERRBLOK: ERROR BLOCK OS ED TO BOILD OBR/MDR 

ERRBLOK contains data describing an error condition such as a channel failure or a device 
failure. 



I 
I 


ERRKEY 


| /E* 1//| //////////ERRRSV2////////////I 


8 I 

1 - , . 


ERRTIME 


| ERRDATE | 


10 | 

i ., .. , 




ERRCCH | 


18 | 
I 




ERRVOLID | E*2 | E*3 | 


20 | 

I 




ERRPARM | 


30 | 

I „ . 




ERRIOB | 


70 | 
I 




ERRIOER | 



Hexadecimal Field 
Displacement Name 






ERRKET 


DS 


3X 


3 


ERRS71 


DS 


1X E*1 


<l 


ERRRS?2 


DS 


1F 


8 


ERRTIME 


DS 


1F 


C 


ERRDATE 


DS 


1F 




ERRHEADR 


EQO 


(♦-ERRBLOK) 


10 


ERRCCH 


DS 


1D 






ORG 


ERRCCW 


10 


ERRMIOB 


DS 


(IOBSIZE)D 




ERRMIOER 


DS 


(IOBRSIZE)D 






ORG 


ERRCCW 


10 


ERRCCHT 


DS 


2X 


10 


ERRCONT 


DS 


OC 


18 


ERR70LID 


DS 


6X 


1E 


ERRSDR 


DS 


1X E*2 


1F 


ERRCORR 


DS 


1X E*3 


20 


ERRPARH 


DS 


2D 


30 


ERRIOB 


DS 


(IOBSIZE)D 


70 


ERRIOER 


DS 


(IOERSIZE)D 




ERRSIZE 


EQU 


(♦-ERRSIZE)/ 



Field Description, Contents, Meaning 

Key used to determine OBR/MDR processing 
Reserved for IBM use 
Reserved for IBM use 
Time record was built 
Date record was built 

Size of header in bytes 

Failing CCW 



Copied IOBLOK 
Copied IOERBLOK 



Size of CONTASK data buffer 

COHTASK data buffer (variable length) 

Volid of failing device 
SDRFLAGS from SDRBLOK 
Correlation count for MDR record 
Device dependent parameter string 
Copied IOBLOK, see IOBLOK for details 
Copied IOERBLOK, see IOERBLOK for details 

ERRBLOK size in doublewords 
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IOBLOK 



IOBLOK: 1^0 TASK CONTROL BLOCK 



IOBLOK contains information required to perform I/O operations. The I/O request 

initiator for the I/O operation is either a CP-initiated or virtual machine-initiated 

event. There are five pointers to the IOBLOK; RCHFIOB field of the RCHBLOK. RCHFIOB 

field of the RCOBLOK, RDEVAIOB field of the RDEVBLOK, VDEVFIOB field of the VDEVBLOK, 
RDEVFIOB field of the RDEVBLOK. 



10 
18 
20 
28 
30 
38 



1 — 

I IOBRADD f 1*1 


|I*2 | 


I0BLINK | 


! IOBFPNT 


1 


IOBBPNT | 


| IOBCYL | IOBVADD | 


IOBMISC | 


| I0B0SER 


1 


IOBIRA | 


| IOBCAW 


1 


IOBRCAW | 


| IOBCSW | 


j IOBIOER 


i 


IOBMISC2 | 


I 1*3 | 1*4 I//I0BRSV2//I//////////I0BRSV3////////////I 

L _ _ ._ _ _ 1 



Hexadecimal Field 
Displacement Name 



IOBRADD 


DS 


1H 


IOBFLAG 


DS 


1X 


Bits defined 


in IOBFLAG 


IOBCP 


EQO 


X'80' 


IOBRSTRT 


EQO 


X'40» 


IOBSPLT 


EQO 


X'20» 


IOBPAG 


EQO 


X'10« 


I0BRELCD 


EQO 


X'08 f 


IOBERP 


EQO 


X'04» 


IOBRES 


EQO 


X«02' 


IOBHVC 


EQO 


X«01» 


IOBSTAT 


DS 


1X 


Bits defined 


in IOBSTAT 


IOBFATAL 


EQO 


X*80» 


IOBFLT 


EQO 


X«40' 


IOBPATHF 


EQO 


X'20' 


IOBMINI 


EQO 


X'08» 


IOBALTSK 


EQO 


X'OU 1 


I0BCC3 


EQO 


X«03' 


IOBCC2 


EQO 


X»02» 


I0BCC1 


EQO 


X'OI 1 


IOBCC0 


EQO 


X'OO' 



Field Description, Contents, Meaning 

Real device address for SIO 
1*1 IOBLOK flags 



CP-generated I/O operation 
Restarted operation - IOBRCAW 
DASD - CP split seek operation 
IOBLOK created for paging I/O 
Control unit released at initiation 
I/O task is under control of ERP 
I/O task has been reset 
I/O initiated via DIAGNOSE instruction 

1*2 IOBLOK status 



Onrecoverable error in this I/O operation 
IOBLOK queued pending completion of a MSS 

cylinder fault 
Path is fixed, use IOBRADD value 
This is a mini-IOBLOK 
DASD channel program has seek to alternate 

track 
Processing CC 3, not available 
Processing CC 2, channel busy 
Processing CC 1, CSH stored 
Processing I/O interrupt 
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IOBLOK 



Hexadecimal Field 
Displacement Name 



4 


IOBLINK 


DS 


1F 


8 


IOBFPNT 


DS 


1F 


C 


IOBBPNT 


DS 


1F 



IOBMSIZE EQO (*-IOBLOK)/8 



10 


IOBCYL 


DS 


1H 


12 


IOBVADD 


DS 


1H 


14 


IOBMISC 


DS 


1F 


18 


IOBOSER 


DS 


1F 


1C 


IOBIRA 


DS 


1F 


20 


IOBCAW 


DS 


1F 


24 


IOBRCAW 


DS 


1F 


28 


IOBCSW 


DS 


1D 


30 


IOBIOER 


DS 


1F 


34 


IOBMISC2 


DS 


1F 


38 


IOBSPEC 


DS 


1X 




Bits defined 


in IOBSPEC 




IOBTIO 


EQO 


X'80* 




IOBHIO 


EQO 


X»40» 




IOBSIOF 


EQO 


X«20« 




IOBIMSTK 


EQO 


XMO 1 




IOBONSL 


EQO 


X«08» 




IOBCOPY 


EQO 


X'04* 




IOBSENS 


EQO 


X«02» 




IOBTRPND 


EQO 


X«01» 


39 


IOBSPEC2 


DS 


1X 



1*3 



Field Description, Contents, Meaning 

Pointer for multipath IOBLOK chain 
Pointer to next IOBLOK in queue 
Pointer to previous IOBLOK in queue 

Multiple path IOBLOK size in doublewords 
(X , 02«) 

DASD - seek cylinder for this IOBLOK 

Virtual device address 

Ose varies according to caller 

Pointer to VMBLOK of user 

IOBLOK interrupt return address 

Pointer to CCW chain 

Pointer to restart CCW chain 

Real CSH for I/O operation 

Pointer to IOERBLOK with sense byte 

Ose varies according to caller 

IOBLOK special requests flag 



lii§ defined in IOBSPEC2 
IOBWRAP EQO X»80» 
IOBCLN EQO X»40« 
IOBOHREL EQO X»20» 





IOBOC 


EQO 


X'10» 




IOBSNSIO 


EQO 


x'os* 




IOBREL 


EQO 


X»04« 




IOBRETRY 


EQO 


X«02' 


3A 


IOBRS72 


DS 


1H 


3C 


I0BRS73 


DS 


1F 



IOBSIZE 



EQO 



IOBLOK request for a TIO 

IOBLOK request for a HIO 

Virtual SIO fast release 

Shut down SDR function 

IOBLOK resulting froa unsolicited interrupt 

I/O block associated with a COPY request 

Sense operation for COPY request 

Virtual trace pending on this I/O block 

1*4 IOBLOK special requests flag second byte 



Input/output task for AOTOPOLL wrap list 
VDEVBLOK locked when CCW got control 
Input/output task contains release, DMKUNT 

■ust process 
Onit check status 

Normal sense operation in progress 
Channel program contains CP release 
CPEXBLOK stacked for retry 

Reserved for IBM use 
Reserved for IBM use 



(♦-IOBLOK) /8 IOBLOK size in doublewords (X'OS 1 ) 



12 



I2£ CP IOBLOKs 

ORG IOBVADD 
IOBRCNT DS 1H 



Retry count 
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1 J> f .7 U ) 



MICBLOK 



MICBLOK S VIRTOAL MACHINE POINTER LIST FOR VM/370 HARDWARE ASSIST 

HICBLOK contains pointers to control registers, the segment table, and other values 
required by the virtual machine assist feature and the VM/370 Extended Control-Program 
Support (ECPS) . This information is needed for the handling of certain instructions and 
privileged operations requested by the virtual machine. The VMMICRO field of the VMBLOK 
points to MICBLOK. 



8 i 

I 

10 I 



MICRSEG 



MICVPSW 



MICVTMR 



MICCREG 



MICWORK 



MICACF 



Hexadecimal Field 
Displacement Name 



MICRSEG 


DS 


1F 


MICCREG 


DS 


1F 


MICVPSW 


DS 


1F 




ORG 


MICVPSH 


MICVIP 


DS 


IX 


Bits defined 


in MICVIP 



DS 



3X 



Field Description, Contents, Meaning 

Real segment table pointer 
Virtual control register pointer 
Virtual PSW pointer 



Virtual interrupt pending bit 



Virtual interrupt is pending; therefore, the 
virtual machine assist feature is not to 
handle change of PSW channel masks or 
external mask from disabled to enabled. 
All other bits in this byte must be 0. 

Address of virtual PSW 



c 


MICWORK 


DS 


1F 


10 


MICVTMR 


DS 


1F 


14 


MICACF 


DS 


1F 






ORG 


HICACF 


14 


MICEVMA 


DS 


1X 




gits defined 
MICLPSW EQO 


in MICEVMA 
X«80«~ 




MICPTLB 


EQO 


X«40« 




MICSCSP 


EQO 


X*20' 




MICSIO 


EQO 


XM0» 




MICSTSM 


EQO 


X»08» 




MICSTPT 


EQO 


X*04 f 




MICTCH 


EQO 


X«02» 




MICDIAG 


EQO 


X»01» 



15 



DS 



3X 



Workspace pointer 

Location to be decremented when the virtual 

interval timer assist feature of VM/370 

ECPS is being used 
Assist controls 



Expanded virtual machine assist control bits 



LPSW simulation 

PTLB simulation 

SCKC, SPT simulation 

SIO simulation 

STNSM, STOSM, and SSM simulation 

STPT simulation 

TCH simulation 

Diagnose simulation 

Reserved for IBM Use 



MICSIZE EQO (*-MICBL0K)/8 Size of DSECT in doublewords (X«03») 
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MIHREC 



IISSIC: MISSING INTERRROPT HANDLER ERROR RECORD 

HIHREC is used in the SVC 76-initiated error recording process of type 70 HIH (Hissing 
Interrupt Handler) records. 



10 



18 



20 



28 



30 



r 


MIHKEIN i A*1 


i/a 


*2//i/a*3//i/a 


* V/ 1 ///MIH SPE 1//// 1 




HIHDTEN 




I 


HIHTHEN | 


| MIHCPID | 


| MIHJOB | 




MIHC0A2 


i 


HIHC0A1 


| MIHVOL | 




MIHVOL (cont. 


) 


I 


HIHDEVT | 


i — 






HIHINT 


— j 



Hexadecimal Field 
Displacement Name 





2 4- Byte 


Header 







HIHKEYN 


DS 


1H 




2 


MIHSWS1 


DS 


1C 


A*1 


3 


MIHSHS2 


DS 


1C 


A*2 


I* 


MIHSRS3 


DS 


1C 


A*3 


5 


HIHRECNT 


DS 


1C 


K*H 


6 


MIHSPE1 


DS 


1H 




8 


HIHDTEN 


DS 


1F 




C 


MIHTMEN 


DS 


1F 




10 


MIHCPID 


DS 


2F 






5§lice Depen 


dent Data 




18 


MIHJOB 


DS 


8X 




20 


MIHC0A2 


DS 


3X 




23 


MIHC0A1 


DS 


3X 




26 


MIHVOL 


DS 


6X 




2C 


MIHDEVT 


DS 


HI 




30 


MIHINT 


DS 


8X 





MIHSIZE EQU (*-MIHREC) 



Field Description, Contents, Meaning 



Type and operating system 

Switch byte 

Reserved for IBM use 

Reserved for IBM use 

Reserved for IBM use 

Reserved for IBM use 

Date 

Time 

Processor identification and model nunber 



Job whose I/O request is pending 
CUA used to address the device 
Primary device address 
Volume serial number of device 
Device type 

Time interval used to check pending 
interrupt 

MIH record size in doublewords (X , 07 l ) 
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HN001 



HI001: VH£370 MONITOR PERFORM CLASS RECORD 



MN001 gives information on the performance of the Attached Processor* 



10 



18 



20 



28 



30 



38 



40 



48 



50 



58 



60 



68 



r 




MN001RID 




-™T 


| MN001WPG | 


| MN001WIO | 


| MN001PRB | 




MN001NXR 




MN001CSV 






MN001PRD 




MN001PWR 






MN001SSY 




MN001NSY 






MN001SFR 




MN001NFR 






MN001SRN 




MN001NRN 






MN001STM 




MN001NTM 






MN001SDP 




MN001NDP 






MN001NFL 




MN001NFS 






MN001NSD 




MN001NVD 


| 




MN001NRO 









Hexadecimal 


Field 






Displacement 


Name 









MN001WID 


DS 




8 


MN001WPG 


DS 




10 


MN001WIO 


DS 




IO 


MN001PRB 


DS 




20 


MN001NR 


DS 


1F 


24 


MN001CS7 


DS 


1F 


28 


HN001PRD 


DS 


1F 


2C 


MN001PWR 


DS 


1F 


30 


MN001SSI 


DS 


1F 


34 


MN001NSY 


DS 


1F 


38 


MN001SFR 


DS 


1F 


3C 


MN001NFR 


DS 


1F 


40 


MN001SRN 


DS 


1F 


44 


MN001NRN 


DS 


1F 


48 


MN001STM 


DS 


1F 


4C 


HN001NTH 


DS 


1F 


50 


HN001SDP 


DS 


IF 


54 


MN001NDP 


DS 


1F 


58 


MN001NFL 


DS 


1F 


5C 


MN001NFS 


DS 


1F 


60 


MN001NSD 


DS 


1F 


64 


HN001NVD 


DS 


1F 


68 


MN001NRO 


DS 


1F 




HN001LEN 


EQO 


♦-MN001 



Field Description, Contents, Meaning 

L8 Attached processor idle wait time 

L8 Attached processor page wait time 

L8 Attached processor I/O wait time 

L8 Attached processor problem state time 

Number of external interrupts to the attached 

processor 
Number of SVCs reflected by the attached 

processor 
Number of page reads by attached processor 
Number of page writes by the attached 

processor 
Total time spin on system lock 
Total number of spins for system lock 
Total time spin on DMKFRE lock 
Total number of spins for DMKFRE lock 
Total time spin on RONLIST lock 
Total number of spins for RONLIST lock 
Total time spin on timer request lock 
Total number of spins for timer request lock 
Total time spin on displacement lock 
Total number of spins for displacement lock 
Number of times CPFRELK set 
Number of times CPFRESW set 

Number of times system lock request deferred 
Number of times 7MBL0K lock deferred 
Number of DMKDSPRO entries 

Length of record 
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MN002 



MH002: RESOURCE MANAGEMENT DATA 



MN002 is used to get information on Resource Management during processing, 



1 




r~ 

MN002SQT 


I 


MN002SET 


i 
1 

i 


8 


MN002SFS 


I 


MN002SAP 


_. ._ | 


10 


MN002SKA 


I 


MN002SUC 




18 


MN002SPB | 


20 


MN002SIB 


I 


MN002SQ3 




28 


MN002Q11 | 


30 


MN002Q12 | 


38 


MN002Q13 | 


40 


MN002Q14 | 


48 


HN002Q15 | 


50 


HN002Q16 


I 


MN002Q17 




58 


MN002Q18 


I 


RESERVED 




60 


MN002Q21 | 


68 


MN002Q22 | 


70 


MN002Q23 | 


78 


MN002Q24 | 


80 


MN002Q25 I 


88 


MN002Q26 


I 


MN002Q27 




90 
i 


MH002Q28 

i 


I 


RESERVED 


- J 



Hexadecimal Field 
Displacement Name 






HN002SQT 


DS 


F 


4 


MN002SET 


DS 


F 


8 


MH002SFS 


DS 


F 


C 


MN002SAP 


DS 


F 


10 


HH002SKA 


DS 


F 


14 


HN002S0C 


DS 


F 


18 


HN002SPB 


DS 


2F 


20 


MM002SIB 


DS 


F 


24 


HH002SQ3 


DS 


F 


28 


HK002Q11 


DS 


D 


30 


HH002Q12 


DS 


D 


38 


MN002Q13 


DS 


D 


40 


HN002Q14 


DS 


D 


48 


BH002Q15 


DS 


D 


50 


MN002Q16 


DS 


F 


54 


HN002Q17 


DS 


F 


58 


HN002Q18 


DS 


F 



Field Description, Contents, Meaning 

DHKSCHQT average queue wait time 

DHKSCHET average wait time for eligible list 

DHKSCHFS average utilization 

DMKSCHAP average resident page request 

DMKSCHKA average desired processor and/or page rei 

DMKSCHOC average processor overhead and/or 

page read 
DMKSCHPB processor use and paging bias 
DHKSCHIB interactive bias 
DMKSCHQ3 count of queue 3 users 
VMQTOD in-queue time stamp 
VHQELP in-queue time 
VMQWT eligible list wait time 
VMQCPD in— queue processor use 
VMQPGS estimated average page wait 

time in seconds 
VMQCNT count of dropouts from queue 
VMQPRD in-queue page reads 
VMQSTL in-queue page steals 
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MNG02 



Hexadecimal Field 
Displacement Name 



5C 
60 
68 
70 
78 
80 

88 
8C 
90 
94 



RESERVD2 


DS 


F 


HI002Q21 


DS 


D 


MH002Q22 


DS 


D 


HN002Q23 


DS 


D 


MN002Q24 


DS 


D 


MN002Q25 


DS 


D 


HN002Q26 


DS 


F 


MH002Q27 


DS 


F 


HN002Q28 


DS 


F 


RESER?D3 


DS 


F 


HN002LEN 


EQO 


*-MN002 



Field Description, Contents, Meaning 



Reserved 
VMQTOD i 
VMQELP i 
VMQWT el 
VMQCPO i 
VMQPGS 
time 
VMQCNT 
VMQPRD 
VMQSTL 
Reserved 



for IBM use 
n— queue time stamp 
n— queue time 
igible list wait time 
n— queue processor use 
stimated average page wait 
n seconds 

ount of droputs from queue 
n— queue page reads 
n— queue stolen pages 

for IBM use 



Length of record 
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MN003 

HN003: VMZ370 SYSTEM EXTENSION EXCLUSIVE MIGRATION DATA 

MN003 contains page and swaptable migration data as well as the count of 370E privilege 
operations. 




8 
10 
18 
20 
28 
30 
38 
40 



r- - ™ 1 

| MN003CMG | MN003TLH | 


| MN003TLQ | MN003TOS | 


| MN003MBC | MN003CRM | 


| MN003NOM | HN003NSH | 


I HN003NPM | MN003NDH | 


| MN003CSR | MN003CSM | 


| MN003NTM | MN003NTR | 


| MN003CPT | MN003RSV | 


I MN003CTP | MN003CIP | 

i _ _ ,_j 



Hexadecimal Field 
Displacement Name 






MN003CMG 


DS 


1F 


4 


MN003TLH 


DS 


1F 


8 


MN003TLQ 


DS 


1F 


C 


MN003TDS 


DS 


1F 


10 


MN003MBC 


DS 


1F 


14 


MN003CRM 


DS 


1F 


18 


MN003NUM 


DS 


IF 


1C 


MN003NSM 


DS 


1F 


20 


HN003NPM 


DS 


1F 


24 


MN003NDM 


DS 


IF 


28 


MN003CSR 


DS 


1F 


2C 


MN003CSM 


DS 


1F 


30 


MN003NTM 


DS 


1F 


34 


MN003NTR 


DS 


1F 


38 


MN003CPT 


DS 


1F 


3C 


MN003RS7 


DS 


1F 


40 


MN003CTP 


DS 


1F 


44 


MN003CIP 


DS 


1F 




MN003LEN 


EQO 


♦-MN003 



Field Description, Contents, Meaning 

Number of calls to migrate 

Number of times migration limit halved 

Number of times limit was quartered 

Number of times a user was selected 

Number of migrations by command 

Number of calls resulting in migration 

Number of users moved 

Number of segments moved 

Number of pages moved 

Number of full disks moved 

Total segment exception 

Calls to migrate swap table 

Number of tables migrated 

Number of tables restored 

Calls to pseudo translator 

Reserved for IBM use 

Total test protect instructions simulated 

Total IPTE instructions simulated 

Length of record 
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HN097, HH098 

MH097; VM/370 MONITOR 111211 RECORD 

MN097 provides header information for a file that contains data accumulated by VH/370 
Monitor. This is the first record of the file. 



I 1 " 

o t 




MH097CPO 




i 


8 I 




MN097LEV 






10 | 




MN097DAT 






18 | 




HN097TIM 






20 | 




MN097UID 






OO 1 


tfnAA1r*nQ 

an v? f wno 




nnv? rauw 




30 | 


MN097FSS 


1 


MN097DPA 




38 | 


MN097TTS 


1 


MN097VR 


t 


40 | 


HN097CPL | MH097APL | 

_ : 1 







Hexadecimal Field 
Displacement Name 






MN097CPU 


DS 


XL8 


8 


MN097LEV 


DS 


CL8 


10 


MN097DAT 


DS 


CL8 


18 


MN097TIM 


DS 


CL8 


20 


MN097UID 


DS 


CL8 


28 


MN097CR8 


DS 


1F 


2C 


MN097NUC 


DS 


1F 


30 


MN097FSS 


DS 


1F 


34 


MN097DPA 


DS 


1F 


38 


MN097TTS 


DS 


1F 


3C 


MN097VR 


DS 


1F 


40 


HN097CPL 


DS 


1H 


42 


MN097APL 


DS 


1H 




MN097LEN 


EQO 


*-MN097 



Field Description, Contents, Meaning 

Processor serial number and model number 

Program level change 

Current date 

Current time 

Oserid of user who invoked MONITOR 

Value of control register 8 

Size of nucleus 

Size of free storage 

Size of dynamic paging area 

Size of trace table 

Size of V=R area 

Logical address of main processor 

Logical address of alternate processor 

Length of header record 



MN098: 7M/370 MONITOR TRAILER RECORD 

MN098 contains the userid of the user who has terminated current VM/370 Monitor activity. 
This is the last record of the file. 



NN098UID 



Hexadecimal Field 



HN098DID DS 
MN098LEN EQO 



Field Description, Contents, Meaning 
CL8 ID of user stopping the VM/370 Monitor 

♦-MN098 Length of trailer record 
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MN400 



MN400; VM/370 MONITOR USER CLASS RECORD 



MN400 provides user virtual machine statistics. 



10 
18 
20 
28 
30 
38 
40 



r - 




MN400UID 


■ 


| MN400TTI | 


| MN400VTI | 




MN400PGR 




MN400PGW | 




MN400I0C 




MN400PNC | 




HN400LIN 




MN4GQCRD j 


| M*1 


| M*2 | M*3 


| M*4 | H*5 


| H*6 | H*7 | M*8 | 


| M*9 


! M*10 | M*11 


I H*12 | H*13 


|/M*14/| HN400RES | 


| MN400WSS | MN400PDR | MN400PDK | MN400INT | 



48 


I M*15 | 

L J 








Hexadecimal 


Field 








Displacement 


Name 











MN400UID 


DS 


CL8 




8 


MN400TTI 


DS 


XL8 




10 


MN400VTI 


DS 


XL8 




18 


MN400PGR 


DS 


1F 




1C 


HN400PGW 


DS 


1F 




20 


MN400IOC 


DS 


1F 




24 


MN400PNC 


DS 


1F 




28 


HN400LIN 


DS 


1F 




2C 


MN400CRD 


DS 


IF 




30 


HN400RST 


DS 


1X 


M*1 


31 


MN400DST 


DS 


1X 


M*2 


32 


MN400OST 


DS 


1X 


K*3 


33 


MN400QST 


DS 


1X 


H*4 


34 


HN400PST 


DS 


1X 


M*5 


35 


MN400EST 


DS 


1X 


M*6 


36 


MN400TST 


DS 


1X 


M*7 


37 


MN400ML? 


DS 


1X 


M*8 


38 


MN400QLV 


DS 


1X 


M*9 


39 


MH400CLV 


DS 


1X 


M*10 


3A 


BN400TLV 


DS 


1X 


M*11 


3B 


MN400PND 


DS 


1X 


M*12 


3C 


MN4000PR 


DS 


1X 


H*13 


3D 


MN4RS71 


DS 


1X 


H*14 


3E 


HN400RES 


DS 


1H 




40 


HN400WSS 


DS 


1H 




42 


HN400PDR 


DS 


1H 




44 


MN400PDK 


DS 


1H 




46 


MN400INT 


DS 


1H 




48 


MN400LPR 


DS 


1X 


H*15 




HN400LEN 


EQU 


♦-HH400 





Field Description, Contents, Meaning 

Oserid 

Current VMTTIME (in 7MBL0K) ; CP simulation 

time 
Current VMVTIME (in VMBLOK) ; user virtual 

time 
Total page reads for this user 
Total page writes for this user 
Virtual nonspooled SIO count 
Virtual cards punched 
Virtual lines printed 
Virtual cards read 
User running status 
User dispatch status 
User operating status 
User gueuing status 
User processing status 
User execution status 
User tracing control status 
User message level 
User queue level 
User command level 
User timer level 
Interrupt pending status 
Directory or SET priority 
Reserved for IBM use 
Number of pages resident 
Estimated working set size 
Drum allocated page frames 
Disk allocated page frames 
Monitor sampling interval (in seconds) 
Last processor on which execution took place 

Length of class 4 code record 
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MN410,MN500 

MHO: 2QNITOR SHADOW TABLE MAINTENANCE OSER RECORD 

MN410 provides user shadow table maintenance data including number of steals and actual 
blocks in use. 



I 

I 

8 I 



MN410SST 



MN410PTS 



MN410HWM 



| M*1 I M*2 | MN410RSV | 
1 






MN410SST DS 


1F 




4 


MN410PTS DS 


1F 




8 


MN410HWM DS 


1F 




C 


MN410NSB DS 


1X 


M*1 


D 


MN410SBO DS 


1X 


M*2 


E 


MN410RSV DS 


1H 






MN410LEN EQD 


♦-MN410 





Total number of STO steals 
Total number of page table steals 
Address of high-water mark 
Maximum number of STO blocks 
Actual number of STO blocks in use 
Reserved for IBM use 

Length of class 4 code 1 record 



MN500: VM/370 MONITOR INSTRUCTION SIMULATION CLASS RECORD 



MN500 provides data on instructions simulated by CP. 



10 



1 




MN500UID 




1 




MN500INS 


1 


MN500VAD 




L _ 




MN5007H 




i 



Hexadecimal Field 
Displacement Name 






MN5000ID 


DS 


CL8 


8 


MN500INS 


DS 


1F 


C 


MN5007AD 


DS 


1F 


10 


MN50007H 


DS 


XL8 




MN500LEN 


EQO 


♦-MN500 



Field Description, Contents, Meaning 

Dserid 

Privileged instruction 

Virtual storage address of the instruction 

Current total of CP simulation time 

Length of class U code record 
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MN600 



MN600: yM/37Q MONITOR DASTAP 1^0 COUNT RECORD 



• Header Record 



MN600HDR header record provides the number of device data packages. 



| MN600NOM 
i 



Hexadecimal rield 
Displacement Name 



MN600NUM DS 1H 



MN600HLN EQO *-MN600HDR 



Field Description, Contents, Meaning 

Number of device data packages that 
follow length of header 

Length of header 



• I/O Count Record 

HN600DE7 input/output count record provides information for each device in the device 
data packages. For FB-512 devices, the block number is converted to a cylinder number. 



| HN600ADD | 
| 

8 I I 

i 



MN600TY 



HN600SER 



MN600CNT 



Hexadecimal Field 
Displacement Name 



HN600ADD DS 
MN600TY DS 
MN600SER DS 
MN600CNT DS 

MN600DLN EQO 

MN600MAX EQO 



Field Description, Contents, Heaning 

1H Device address 

1H VM/370 device type and/or codes 

CL6 Volume serial number of device 

XL4 Device accumulated I/O count 

♦-MN6G0DEV Length of each data record 

(4096-MNBHDLEN-MNHDRLEN-MN600HLN)/MN600DLN 
Maximum device count 
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MN602; £H^370 MONITOR DAS TAP UTILIZATION RECORD 



• Header Record 



NN602HDR provides the number of samples for intervals of device packages. 



| MN602SAH I 

i 



Hexadecimal Field 
Displacement Name 



MN602SAM DS 



1H 



Field Description, Contents, Meaning 
Number of samples for interval 



• Dtilization Record 

MN602 provides, via CP MONITOR command, utilization data for DASD and tape devices. 
There is one record for each device. 



| MN602ADD 
| 

8 | HN602CHQ 
i 



| MN602CHB | MN602C0B | MN602DVB 



MN602CUQ 



| M*1 | 
j 



Hexadecimal Field 
Displacement Name 






MN602ADD DS 


1H 


2 


MN602CHB DS 


1H 


4 


MN602CUB DS 


1H 


6 


MN602DVB DS 


1H 


8 


MN602CHQ DS 


1H 


A 


MN602CUQ DS 


1H 


C 


MN602DVQ DS 


1C M 




MN602DLN EQD 


♦-MN602DEV 



Field Description, Contents, Meaning 

Address of the device 

Number of times channel is busy 

Number of times control unit is busy 

Number of times device is busy 

Input/output tasks queued on channel 

Input/output tasks queued on the control unit 

Input/output tasks queued on device 

Length of device portion in doublewords 
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MH700: 13^370 MONITOR SEEKS CLASS RECORD 



MN700 provides, via CP MONITOR, the I/O tasks and cylinder seek activity of a specified 
I DASD. For FB-512 devices, the block number is converted to a cylinder number. 



MN7000ID 



8 | MN700ADD 
I 



MH700CYL 



I MN700CCY l M*1 | M*2 | 



10 | H*3 | M*4 

i 



Hexadecimal Field 





naac 











MN700DID 


DS 


CL8 




8 


MN700ADD 


DS 


1H 




A 


MN700CYL 


DS 


1H 




C 


MN700CCY 


DS 


1H 




E 


MH700QD? 


DS 


1X 


M*1 


F 


MN700QC0 


DS 


1X 


M*2 


10 


MN700QCH 


DS 


1X 


M*3 


11 


MN700DIR 
NN700LEN 


DS 
EQD 


1X 

♦-MN700 


H*4 



TP-ioTfl DseCiD+iQ" fftntontc Reaninn 
* •—'«—■♦* ~*-~~-— c -— — — r ~-~ — , — _ — — 3 

Oserid 

Device address 

Cylinder being sought 

Current cylinder 

I/O tasks queued on the device 

I/O tasks queued on the control unit 

I/O tasks queued on the channel 

Seek direction: 00=lower, 01=higher 

Length of class 7 code record 
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HN802 
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HH802: 7M^370 M OH IT OR SYSTEM PROFILE CLASS 



• Header Record 



MN802HDR provides the nuiber of device block counters. 



| MN802N0H | 

i 



HN802CNT 



Hexadecimal Field 
Displacement Name 






MN802NUM DS 


1H 


2 


HN802CNT DS 


XL 4 




MN802DLN EQU 


♦-HN802CTR 



Field Description, Contents, Heaning 

Number of device block counters 

that follow 
Device I/O count 

Length of the header 



• System Profile Data 

HN802CTR provides, via CP MONITOR command, additional system profile data. The monitor 
data includes: the I/O activity for each device, the number of logged on users, number of 
page read/writes, and the total system I/O, page wait, and problem state times. 



10 



18 



20 



28 



J.____ 


HN802NAU 


1 


MN802PGR 


1 




HN802PGW 


1 


MN802NPP 




I HN802WID | 


| MN802WPG | 


I MN802WIO | 


i 




HH802PRB 




j 



Hexadecimal Field 
Displacement Name 





4 

8 

C 

10 

18 

20 

28 



HN802NAO DS 


1F 


HN802PGR DS 


1F 


HH802PGN DS 


1F 


HN802NPP DS 


1F 


MN802RID DS 


XL8 


MN802WPG DS 


XL8 


HN802NIO DS 


XL8 


HN802PRB DS 


XL 8 


MN802CLN EQD 


♦-MN802CTR 



Field Description, Contents, Heaning 

No. of logged on users 
Total system page reads 
Total system page writes 
No. of system pageable pages 
Total system idle wait time 
Total system page wait time 
Total system I/O wait time 
Total system problem time 

Length of each data entry 
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MONCOH 



Hexadecimal 


Field 




Displacement 


Nane 









MONARDB DS 


1F 


4 




H0NFLAG1 DS 


1X 






Bits defined 
MONSYSVM EQO 


in HONFL 

x'80* 






CFSTOP EQO 


X'20« 






TRDN EQO 


XMO' 






ERROR EQO 


X'08' 






HONTIINT EQO 


X'04' 






HONLSTBK EQO 


X«02' 






HONIBOF EQO 


X'01« 


5 




HONFLAG2 DS 


1X 



DD 



Field Description, Contents, meaning 

Address of monitor tape real device block 
H*1 Honitor flag 



Flag used by user class routine 

HONITOR STOP command has been issued 

Tape rewind-unload CCW has been scheduled 

Tape error has occurred — stop VH/370 monitor 

Handling timer interruption 

Handling the last block 

Only one buffer for VM/370 monitoring 



Sits 2®£iS®S iS HONFLAG2 
SOSPEND EQO X'80' 
HONHIAPG EQO X'40« 



6 


HONDVNOM 


DS 


1H 


8 


MONDVLST 


DS 


1F 


C 


H0NRS71 


DS 


1F 


10 


M0NAI0B 


DS 


1F 


n 


MONATRB 


DS 


1F 


18 


HONCLOCK 


DS 


1D 


20 


HONSOSCK 


DS 


1D 


28 


HONSOSCT 


DS 


1F 


2C 


HONRSVDl 


DS 


IF 


30 


HONSAVE1 


DS 


16F 


70 


M0NSAVE2 


DS 


16F 


BO 


M0N0SER 


DS 


8C 


B8 


MONSPLCT 


DS 


1F 


BC 


MONSFB 


DS 


1F 


CO 


H0NC0RV 


DS 


1F 


C4 


HONNXTV 


DS 


1F 


C8 


MONCORR 


DS 


1F 


CC 


HONNXTR 


DS 


1F 


DO 


HONDASA 


DS 


1F 


D4 


HONDASB 


DS 


1F 


D8 


HONDAS 


DS 


1F 


DC 


HONEX 


DS 


1C 



H*2 Work byte 



VH/370 monitor has been suspended 
Pageable module being made resident 

Number of entries in real device list 

Address of the real device list 

Reserved for IBH use 

Address of monitor tape I/O block 

Address of monitor timer request block 

TOD clock stamp for each record 

TOD clock value at last suspension 

Suspension count 

Reserved for IBH use 

Honitor internal save area for main processor 

Honitor internal save area for attached 

processor 
Oser starting/stopping the VH/370 monitor 
Number of records on spool file 
Address of SFBLOK for spool file 
Virtual address of first virtual buffer 
Virtual address of second virtual buffer 
Real address of first virtual buffer 
Real address of second virtual buffer 
Address of next DASD buffer 
Address of previous DASD buffer 
Address of DASD buffer for the spool file 
Flag byte 



Bits defined in MONEX 
CLCMD EQO X'80' 



H0NFLAG3 DS 



1C 



H*3 



M*4 



Bits defined in M0NFLAG3 
CLSOS EQO X'80' 
EXHAOST EQO XMO' 
CL EQO X'20' 
SPOOLED EQO XMO' 



DE 


H0NB0FN0 


DS 


1H 


E0 


H0NC0RBF 


DS 


IF 


E4 


MONCRSLT 


DS 


1F 


E8 


HONIOBF 


DS 


1F 


EC 


HONIOSLT 


DS 


1F 


F0 


H0SSKLST 


DS 


1F 


F4 


HONSACT 


DS 


1F 


F8 


HONCHPTR 


DS 


1F 


FC 


MONOTRB 


DS 


1F 


100 


H0NB0F1 


DS 


1F 



Spool file closed by command 
Flag byte 



Suspend during close 
Spool DASD slots exhausted 
Suspension necessary 
Honitor to spool active 

Reserved for IBM use 

Address of current VH/370 monitor buffer 

Corresponding slot address 

Address of VH/370 monitor buffer going to 

tape 
Corresponding slot address 
Address for device list seeks 
Limit count for real time monitor 
Address of channel sampling data 
Address of I/O utilization 
First VH/370 monitor buffer address 
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MONCOM 
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Hexadecimal Field 
Displacement Name 



104 



M0NB0F17 EQO 



Field Description, Contents, Meaning 

M0NB0F1+4 First buffer address of regaining 

variable number of buffers. There 
is one 4-byte entry for each 
monitor buffer. The last field 
contains X»FFFFFFFF f 



MONSIZE EQO (*-M0NC0M)/8 Size of DSECT in doublewords 
Associated Monitor Control Flags 



Zlags in DM K SYS AT 
AOTOGO EQO X'80« 
AOTOSPL EQO X'^O* 



MONSLMT EQO 



X»20' 



SYSMON setting for AOTODISK on 
Stop monitor when spool file 

record limit is reached 
Sampling for real time Monitor 



l2fiitor Buffer Control Flag in Byt e 3 of Bu ffe r 

for Tape and in By_te 9 of Buffer for Spool 

MOHBOFIO EQO X'OO* Not collecting; being used for 

output 
MONBOFAV EQO X'OI 1 Available for use 
MONBOFAC EQO X'03 1 Current active collector 

Mo Jaii2£ Buffer Control Flag in Byte 10 of Spool Bu ffer 
TRAP ~EQO ~ X'80« ~ Last buffer queued for I/O 
ONFIN EQO X'^O 1 Close occurred before the 

buffer was full 

ZiM in Spool File Control Block (SFBFLAG2) 

SFBMON EQO X»01 7 "Monitor spool file identifier 
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MSSCOM 



MSSCOM: MSS COMMUNICATIONS CONTROL BLOCK 



MSSCOM contains information necessary to request a MSS volume mount, request a MSS volume 
demount, or complete processing when a pack change interrupt is received on a MSS device. 
The MSSCOM blocks are chained from location DMKSSSHQ in module DSKSSS. 



MSSSER 



MSSVUA 



////////MSSRSRVD///////// | 



MSSTASK1 



10 
18 
20 



MSSTASK2 



I 



MSSTASK3 



MSSNEXT 



MSSUSER 



MSSUSER (cont.) | MSSFLAGS | 
1 



Hexadecimal Field 
Displacement Name 






MSSSER 


DS 


CL6 


6 


MSSVUA 


DS 


XL2 


8 


MSSRSRVD 


DS 


1F 


C 


SSSTASK1 


DS 


IF 


10 


MSSTASK2 


DS 


1F 


14 


MSSTASK3 


DS 


1F 


18 


MSSNEXT 


DS 


1F 


1C 


MSSUSER 


DS 


CL8 


24 


MSSFLAGS 


DS 


X12 




Bits defined 


in MSSFLAGS 



MOUNT EQU X'8000' 
DEMOUNT EQU X s 2000' 
MSSERR EQU X'UOO' 



RQENT 


EQU 


x'so 1 


MQENT 


EQU 


X«40* 


INPROC 


EQU 


X'20« 


MSGPROC 


EQU 


XM0» 



Field Description, Contents, Meaning 

Volume serial number of the MSS volume 

to be mounted or demounted 
Device address for the volume 
Reserved for IBM use 
Pointer to a CPEXBLOK for a pending 

MSS pack change interrupt 
Pointer to a CPEXBLOK for a pending 

MSC return on mount or demount 
Pointer to a CPEXBLOK for an I/O 

request to a volume being mounted 
Next entry in the chain, or zero 
Name of the virtual machine that 

requires the MSS activity 
Binary flags representing the 

status of the request 



Mount volume MSSSER on address MSSVUA 

Demount MSSSER from MSSVUA 

The MSC detected an error while 

attempting the requested action 
This request is waiting to be passed 

to the MSC 
This request has been passed to the 

MSC, and is awaiting a pack change 

interrupt 
This request being processed by the MSC 
The MSC has completed for this request 

and message DMKSSS088I is being sent 



MSSSIZE EQU (*-HSSSER)/8 MSSCOM size in doublewords 
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NCPTBL 

NCPTBL: NAMED 370X CONTROL PROGRAM TABLE 

NCPTBL entries provide description information on 370x control program images saved on 
CP-owned volumes. 



10 



18 



r 


NCPPNT 


1 


NCPSIZE 


i 
I 


I NCPNAME | 




NCPVOL 




1 N*1 


|//N*2///| 


i 


NCPSTART 


1 


NCPPAGCT 


j 



Hexadecimal Field 
Displacement Name 






NCPPNT 


DS 


1F 


4 


NCPSIZE 


DS 


1F 


8 


NCPNAHE 


DS 


CL8 


10 


NCPVOL 


DS 


CL6 


16 


NCPFLAG 


DS 


1X 



Bits defined in NCPFLAG 
NCPTNCP EQD X'01 1 
NCPTCEP EQO X'02« 
NCPTPEP EQO X'03» 



17 


NCPRSV1 


DS 


1X 


18 


NCPSTART 


DS 


1F 


1C 


NCPPAGCT 


DS 


1F 




NCPSIZE 


EQO 


(* 



Field Description, Contents, Meaning 

Displacement to next entry 
370x storage size required for load 
Control program reference name 
Volume identification of DASD containing 
saved image 
N*1 CPTYPE flag byte 



Network Control Program 

270x Emulation Control Prograa 

Partitioned Emulation Program 

N*2 Reserved for IBM use 

Pointer to first page (CCPD or PPPD) 

on NCPVOL of saved NCP 
Total number of pages saved 



(*-NCPSIZE)/8 NCPTBL size in doublevords (X'04') 
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NICBLOK 

NICBLOK: NETWORK INTERFACE CONTROL BLOC K 

NICBLOK contains control information related to 370U/3705 resources, teleprocessing 
lines, and display screen status information. The RDEVNICL field of RDEVBLOK points to 
NICBLOK. 

• Network Interface Control 



f 
I 


NICNAME | NICEPAD | 


N*1 


I N*2 | 


N*3 | 


N*4 | 


I" 
8 I 


NICRCNT I NICVRID | 




NICTMAT 






10 • 


NICUSER | 




NICQPNT 






18 | 

i, 


NIC 


DSP 








raphic Device Support 


r~ 
I 


NICNAME | G*1 | G*2 | 


N*1 


I N*2 | 


N*3 | 


N*4 | 


8 I 


NICSELT j NICPOLL | 




NICATBR 






10 | 


NICUSER | 




NICQPNT 






18 I 


G*3 | G*4 | G*5 | G*6 | 




NICRSV2 




_ j 



Hexadecimal Field 
Displacement Name 



NICNAHE 


DS 


1H 


NICEPAD 


DS 


1H 


NICSTAT 


DS 


1X 


Bits defined 
NICERLK ~EQ0 


in NICSTAT 
X T 80»~ 


NICNTRL 


EQO 


X'40» 


NICDISA 


EQU 


X«20« 


NICSNEP 


EQU 


X«10' 


NICEPHD 


EQU 


X«08» 


NICLTRC 


EQU 


X«02« 


NICDED 


EQO 


X«01» 


NICTRQ 


EQO 


X»80« 


NICHOLD 


EQO 


X'10» 


NICMORE 


EQO 


X»08» 


NICRONN 


EQO 


X'04» 


NICREAD 


EQO 


X f 02« 


NICCPNA 


EQO 


X«01» 


NICFLAG 


DS 


1X 


Bits defined 
NICSESN EQO 


in NICFLAG 
X T 80« 


NICATTN 


EQO 


X"»0« 


NICPSUP 


EQU 


X^O' 


NICATOF 


EQO 


XMO 1 


NICENAB 


EQO 


X»08« 


NICDISB 


EQO 


X»02« 


NICMTA 


EQO 


X'01« 


NICFMT 


EQO 


X s 80» 


NICDIAG 


EQO 


X'40 1 


NICALRH 


EQO 


XMO 1 


NICCARD 


EQO 


X'OU' 


NICPROCN 


EQO 


X'01' 



Field Description, Contents, Meaning 

370x NCP resource name 
Subchannel address when in EP mode 
N*1 Resource status flags 



Device error lock is set 

Control operation is active 

Resource inactive (offline) 

Resource is switchable to EP mode 

Resource now in emulator mode 

NCP line trace active 

Resource is dedicated 

Graphic device - timer request pending 

Graphic device - screen full; in HOLD status 

Graphic device - screen full; in MORE status 

Graphic device - screen in running status 

Graphic device - read pending for screen input 

Graphic device - last input not accepted 

f*2 Interface control flags 



Session is active for this device 

Attention handling in progress 

Resource has print suppress feature 

Suppress attention signal character 

Resource is active and enabled 

Resource to be disabled as soon as possible 

Multiple terminal access resource 

Graphic device - screen formatted VM/370 online 

Graphic device - screen written with DIAGNOSE 

Graphic device - screen has an alarm message 

Graphic device - data from card reader 

Graphic device - process control task now 
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Hexadecimal 
Displacement 

6 

7 



Field 
Name 

NICLLEN DS 
NICTYPE DS 



1X 
1X 



B its defined in HICTYPE 
NICCTLR EQU X T 00' 
NICLINE EQD X'80 1 
NICTERM EQO X'40» 
NICLGRP EQD X'20« 



Field Description, Contents, Meaning 

H*3 Terminal output line length 
N*U Resource type and/or features 



Resource is the 370x 
Resource is a teleprocessing line 
Resource is a terminal device 
Resource is a logical line group 
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NICBLOK 



Hexadecimal Field 

nienlaronont HaiP 



Field Description. Contents. Meanina 



lits de fined in NICTYPE (cont.) 



N1CSDLC 




Tl Q«« 


LINE 


NICLBSC 


EQO 


X*04» 


LINE 


NICSHCH 


EQD 


X*02« 


LINE 


NICMLTP 


EQU 


X*01* 


LINE 


NICTELE 


EQO 


X'10» 


TERM 


NICCIBM 


EQD 


X'08» 


TERM 


NICBCPD 


EQD 


X'OH' 


TERM 


NICRSPL 


EQD 


X'02 1 


TERM 


NICGRAF 


EQD 


X'01« 


TERM 



3270 Control Dnit Ty^e 
NIC3271 EQO X»08» 
NIC3274 EQO XMO* 
NIC3275 EQO X'OH 1 

NIC3276 EQD X'18' 

NICOPRDR EQO XMO' 



8 


NICRCNT 


DS 


1H 


A 


NICVRID 


DS 


1H 


C 


NICTMAT 


DS 


1F 


10 


NICOSER 


DS 


1F 


n 


NICQPHT 


DS 


1F 


18 


NICDSP 


DS 


1D 






ORG 


NICDSP 




NICRSV1 


DS 


1X 




NICDTYPE 


DS 


1X 



Bits define in HICDTYPE 
NICD3277 EQD X'04» 
NICD3275 EQD X , 02« 



NICHDL DS 
NICRS72 DS 
NICRSY3 DS 



1X 
1X 
1X 



Synchronous data link control 
Binary synchronous line control 
Switched line interface 
Multiple-drop leased line 
Telegraph line adapter 
Selectric-based terminal 
Bisynch remote computer 
Bisynch remote spool device 
Bisynch remote graphics 



Graphic device - 3271 control unit 
Graphic device - 3274 control unit 
Graphic device - 3275 standalone display 

station 
Graphic device - 3276 display 

station/control unit 
Graphic device - card reader feature 

Retry count for BTD errors 
Virtual resource ID when dedicated 
TOD clock value when attached 
VMBLOK address of associated user 
Pointer to input BTD chain 
Remote 3270 information 



Reserved for IBM use 
Display station type 



3277 display station 
3275 display station 

Display station model 
Reserved for IBH use 
Reserved for IBM use 



NICSIZE EQO (*-NICBL0K)/8 Size of block in doublewords (X'03 1 ) 



18 



Remote Graphic Device Support - 3270 on Binary Synchronous Lines 

ORG HICEPAD 
NICCORD DS 1X G*1 Current line coordinates 
NICTMCD DS 1X G*2 Terminal mode 



Bits defined in NICTMCD 
NICOSEWA EQO X T 80« 
NICSIO EQO X'40 1 
NICAPL EQO X^O 1 
NICTEXT EQO XMO 1 

ORG NICRCNT 
NICSELT DS 1H 
NICPOLL DS 1H 
NICATRB DS 1F 

ORG HICDSP 
NICGRTY DS 1X 



Ose ERASE/WRITE ALTERNATE or ERASE/WRITE 

DIAGNOSE issued to input area 

APL on for 3270 remote 

Text feature on for 3270 remote 



Remote station selection characters 
Remote station polling characters 
Timer request block address 



G*3 Display screen size index value 
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NICBLOK 



Hexadecimal Field 
Displacement Name 



19 



1A 
1B 
1C 



NICDTYPE DS 


1X 


G*U 


Bits define in 
NICD3277 EQO 


HICDTYPE 
X«04» 




NICD3276 EQO 


X«Q3» 




SICD3275 EQO 


X«02» 




NICD3278 EQO 


X»01« 




NICMDL DS 


1X 


G*5 


NICRST1 DS 


1X 


G*6 


NICRSV2 DS 


1F 





Field Description, Contents, Meaning 
Display station type 



3277 display station 
3276 display station 
3275 display station 

3278 display station 

Display station model 
Reserved for IBM use 
Reserved for IBM use 

lauate Symbols for VM£370 Support of the 370x 
WRITBRK EQO X«09» ~* Write break CCW operation code 
RDBOFLN EQO 96 Length of host read buffers 

RDBOFHO EQO 6 Number of host read buffers 

Sense Bits (sense byte 0) Peculiar to the 37P* 

IPLREQ EQO X , 02» IPL reguired — 3705 inactive 

ABORT EQO X'OI* Buffer depletion — transfer terminated 
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WDBTPT 



NPRTBL: NAMED lfLQ.9. IHiGE LIBRARY TABLE 

SPRTBL lists by name all pages saved and indicates the DASD volume that contains the 
saved image. 





8 

10 

18 



| NPRPNT 


I 


NPRRSV1 




■ 


| NPRNAME | 




NPRVOL 


| N*1 


| N*2 




| NPRSTART 


I 


NPRPAGCT 




! 



Hexadecimal Field 
Displacement Name 






NPRPNT 


DS 


1F 




4 


NPRRSV1 


DS 


1F 




8 


NPRNAME 


DS 


CL8 




10 


NPRVOL 


DS 


CL6 




16 


NPRCNT 


DS 


1X 


N*1 


17 


NPRRSV2 


DS 


1X 


N*2 


18 


NPRSTART 


DS 


1F 




1C 


NPRPAGCT 


DS 


IF 





Field Description, Contents, Meaning 

Chain pointer to next entry 
Reserved for IBM use 
Reference name for image library 
Volume of DASD containing the 

saved image 
Number of 3800s active on this image 
Reserved for IBM use 
CCPD of first page on NPRVOL 
Number of pages saved 
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OBRRECH (Long OBR) 

OBRRJCR: UNIT CHECK ERROR RECORD (LONG OUTBOARD RECORD) 

OBRRECN provides error, sense, and other statistical data needed for error recording on a 
specified channel-attached I/O device. 



i OBRKEYN i OBRSWSN j //////////O BR SPE1 ////////// J 



8 
10 
18 
20 
28 
30 
38 
40 





OBRDTEN 


I 


OBRTMEN | 


| OBRCPIDN | 


| OBRPGMN | 


| OBRFCCWN | 


| OBRCSWN | 


| 0*1 


I OBRCOAIN 


I 


OBRDEVTN | 


| 0*2 


I OBRCDAPR 


| OBRIORTY | OBRSNSCT | 




Device 


Dependent 


Data j 



Hexadecimal Field 
Displacement Name 



Field Description, Contents, Heaning 



24-By_te Header Record 








OBRKEYN 


DS 


1H 


2 




OBRSWSN 


DS 


1H 




Byte 


Bits def 



OBRMORE 


Lned 
EQO 


in OBRSWSN 
X f 80 f 






OBRTOD 


EQO 


X»40» 




Byte 


Bits defined 

1 

OBREOD EQO 


in OBRSWSN 
X»80» 






OBRTEMP 


EQO 


X»40» 






OBRSHOBR 


EQO 


X«20» 






OBRDEMNT 


EQO 


X»04» 


4 




OBRSPE1 


DS 


1F 


8 




OBRDTEN 


DS 


1F 


C 




OBRTMEN 


DS 


1F 


10 




OBRCPIDN 


DS 


2F 



Record type 
Switches 



Hore records to follow 

TOD clock instruction issued 



SDR counters dumped at EOD 
Temporary error 
Short record 
Volume demounted 

Reserved for IBM use 

Date 

Time 

Processor identifier and serial number 



OBRHSIZE EQO (*-OBRRECN) Size of OBR header 
Jnd of 2 4- Byte Header Rec or d 



18 


OBRPGHN 


DS 


2F 


20 


OBRFCCWN 


DS 


2F 


28 


OBRCSWN 


DS 


2F 


30 


OBRDDCNT 


DS 


1X 


31 


OBRCOAIN 


DS 


3C 



Job identification 
Failing CCW 
Failing CSW 
0*1 Number of doublewords in device-dependent 
extension 
Address of failing device 
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OBRRECN (Long OBR) 



Hexadecinal Field 



40 
48 
50 



58 
62 



58 



4A 



40 



40 
41 
48 
52 



40 
41 
48 
52 



48 
52 



Tiolfl Hocrrintinii fnn + ontc Moan-inn 

Device type 
0*2 Number of SDR work area bytes 

On m -* t*tw «n-i + -a ^ ^ t* *% «-■ *■■ 

r ju j- « a. a- j utju-i- <~ auujtcoo 

Number of retries 
Number of sense bytes 

0BR1SIZE EQ0 (*-0BRRECN) Size of long OBR record base 

Z2£Mfe 2l 2§li£e Dependent Da ta 



n-i enl aromonf 


Name 






34 


OBRDEVTN 


DS 


1P 


38 


OBRSDRCT 


DS 


11 


•JO 
■J J» 


uuuuuacu 


nc 

JUfcJ 


3C 


3C 


OBRIORTY 


DS 


2X 


3E 


OBRSNSCT 


DS 


2X 



iii DASD Dnits 
OBRVOLN DS 8C 
OBRLSKN DS 8X 
OBRHAN DS 8X 

2314^2319 Format 
OBRSDRWK DS 10X 
OBRSENSM DS 6C 

0BR2SIZE EQU (*-0BRRECN) 

3350^3340^330^2305 Format 

ORG OBRSDRWK 
0BR33SNS DS 24C 





0BR3SIZE 


EQD 


(♦-OBRRECN) 




FB-512 Format 

"org 


0BRV0LN+6 


I 46 


0BRRSV1 


DS 


6X 


| 4C 


OBRPBN 


DS 


4X 


I 50 


0BRRSV2 


DS 


2X 


| 52 


OBRCCHS 


DS 


4X 


| 56 


0BRRSY3 


DS 


2X 


I 58 


OBRFBSNS 


DS 


24X 


I 70 


0BRRSV4 


DS 


4X 




Onit Record Format 



ORG OBRVOLN 
0BR0RST DS 10X 
OBR0RSNS DS 1C 

3505/3525 Format 

ORG OBRVOLN 
OBR3505S DS 1C 



3203 Format 

ORG 


OBRVOLN 


OBRCORRL DS 


1X 


DS 


7X 


0BRSDR03 DS 


10X 


OBR3203S DS 


24C 


3211 Format 




ORG 


OBRVOLN 


OBRCORL DS 


11 


DS 


7X 


0BRSDR32 DS 


10X 


0BR3211S DS 


6C 


2400 Tape Format 

ORG ~ OBRLSKN 


OBRTAPST DS 


10X 


OBRTAPSN DS 


24C 



Volume identification 
Last seek address 
Home address 



SDR work area 
Sense data 

Maximum size of 2314/2319 record 



3350/3340/3330/2305 sense data 
Maximum size of 3330/3340/2305 record 



Reserved for IBM use 

Physical block number 

Reserved for IBM use 

Address of a data field (CCHS) on disk 

Reserved for IBM use 

Sense data for FB-512 

Reserved for IBM use 



SDR work area 

Unit record sense data 



3505/3525 sense data 



Correlation number 
Reserved for IBM use 
SDR work area 
3203 sense data 



Correlation number 
Reserved for IBM use 
SDR work area 
3211 sense data 



SDR work area 
Tape sense data 
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OBRRECH (Long OBR) 



Hexadecimal Field 
Displaceiient Naie 





M20/3410 Tape Foraat 




ORG OBRLSKH 


48 


OBRDVDEP DS 16C 


58 


0BR342ST DS 20X 


6C 


OBR3420S DS 24C 




8809 Tape Format 




~ORG " OBRVOLH 


46 


OBRBLKLH DS 2X 


48 


0BR8809S DS 32X 



Field Description, Contents, Meaning 



Device dependent data 
SDR work area 
3420 sense data 



Block length 

Sense data for 8809 



66 IBM VM/370 Data Areas and Control Block Logic 
Licensed Material — Property of IBM 



Copyright IBM Corp. 1979 



Pg. of SY20-0884-3 Rev June 29, 1979 by Supp LD23-9035-0 for 5748-XE1 

OBBBEC (Short OBR) 

QBRREC: ONIT CHECK ERROR RECORD (SHORT OUTBOARD RECORD) 

OBRRECN provides error, sense, and other statistical data needed for error recording on a 
specified channel-attached I/O device. 

i ] : 1 

18 | OBRDEVSH | 0*1 | OBRCOA 



20 | OBRSDRIN 



30 | I//////////OBRSV1/////////// 

i , 



Hexadecimal Field 

Displacement Name Field Description, Contents, Heaning 



24-B yt e Header Record 

Note; The 24-byte Header Record for the SHORT OBR is identical to that of 

the Long OBR, the description of which precedes this block. 

18 OBRDEFSH DS 1F Device type 

1C OBRSDRSH DS 1X 0*1 Number of SDR work area bytes 

OBRSIZE EQO (*-0BRRECN) Size of short OBR record base 

0BRSIZE1 EQO (*-0BRRECN*7) /8 Size in doublewords (X'04') 

1D OBRCOA DS 3X Channel and unit address 

20 OBRSDRIN DS 20X SDR work area 

ORG OBRSDRIN 

20 0BRSSDR1 DS 10X SDR work area 

2A 0BRSSDR2 DS 10X SDR work area 

3H 0BRSV1 DS 1F Reserved for IBH use 

0BRSIZE2 EQU (*-0BRRECN*7) /8 Size in doublewords (X^M 
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PSA 

PSA: PREFIX STORAGE AREA (LOW STORAGE LOCATIONS) 

PSA is the primary control block for controlling CP and virtual machine activity- This 
control block contains the normal low core IPL, logout, and PSW information; the 
processor model and type and features of the processor; and save areas used by BALR and 
FREE. This block also contains monitor and 1 
virtual machines, real devices, and spool files. 

Not e; All fields reside in real PSA unless otherwise specified. Fields residing in 
absolute PSA are specifically identified. For uniprocessor operation, real PSA equals 
absolute PSA (or 0) . If the system was running in AP mode when a catastrophic error 
occurred, the Attached Processor will no longer be running. System recovery is in 
uniprocessor mode and the real PSA will no longer be zero. 





Page 


, Machine Usage 





IPLPSW 


| IPLCCW1 \ 


10 


IPLCCW2 


| EXOPSW | 


20 


SVCOPSW 


| PROPSW | 


30 


MCOPSW 


I IOOPSH | 


40 


csw 


| CAW IQUANTUMRI 


50 


TIMER | QUANTUM | EXNPSW | 


60 


SVCNPSW 


! PRNPSW ! 


70 


MCNPSW 


| IONPSW | 


80 


CPULOG | 


100 


FXDLOG | 


160 


FPRLOG | 


180 


GPRLOG | 


1C0 


CRLOG | 


200 


TEMP5A7E i 


240 


BALRSAVE | 


280 


FREESAVE | 


2C0 


FREEWORK | 


2F0 


DATE 


| TODATE | 


300 


STARTIME 


| CPUID | 


310 


IDLEHAIT 


I PAGEWAIT | 


320 


IONTWAIT 


I PROBTIME | 


330 


RUNP3W 


IRDNDSER IDSPLPSW ! 


340 


RUNCR0 JRUNCR1 


jCPSTAT ICPRESTRTj 


350 


PGREAD IPGWRITE | PGWAITIM | 


360 


////PGWAITPG///////IPSASVCCT | P* 1 |P*2| 

i 1 



r "■■ 

370|CPID 


1CP ABEND 


|P*3 |P*4 


IASYSVM | 


380| 


ARSPPR 


IARSPPU 


IARSPRD 


| ARIOPU | 


390! 


ARIOPR 


jARIORD 


jP*5 |P*6 


| ARSPAC | 


3A0| 


AVMREAL 


IASYSABND 


IASYSLC 


IASYSOP | 


3B0| 


ARIOCT 


IARI0CH 


IARIOCU 


IARIODV | 


3C0| 


ARIOCC 


| ARIOUC 


IARIODC 


|AC0RETBL| 


3D0| 


APAGCP 


ICPCREG0 


ICPCREG6 


ICPCREG8 | 


3E0| 


TIMEDISP 


IASVCLIST 


! AVMALIST 


ILASTUSERJ 


3F0| 


PAGECUR 


IMONNEXT 


IPAGEND 


IPAGENXT | 


400 | 


TRACEFLG 


ITTSEGCNT 


I//////PSARSV15////I 


410| 


/////////PSARSV15 


(cont.)////|ACSHN | 


420! 


VRSVUID 


I ASFBACO 


IARSPTA | 


430| 


INSTWRD1 


IINSTWRD2 


IINSTWRD3 


|INSTWRD4| 


440| 
t 




Constants Pool 




1 

4D0|APTRLK 
i 


INOADD 


| X40FFS 


|XRIGHT24| 


1 
4E0|XPAGNUM 
I , 


IXRIGHT16 


| AFREE 


| AFRET j 


1 

4F0|AQCNWT 
i 


IADSPCH 


| APTRAN 


|X2048BND| 


500| 




DUMPSAVE 




540| 
■ 




SIGSAVE 




580| 




LOKSAVE 
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PSA 



5C0| 

I 

600| 

640 
650 
660 
670 
680 
690 
6A0 



MFASAVE 



I | 6B0 
6C0 



SWTHSAVE 



LOCKSAV 



SVCREGS 



PREFIX A | PREFIXBI PSACPXBP I//RESVD// 



WAITSTRT 



WAITEND 



PWTPAGESI ACTIVTRQI EMSPEND | EHSREC 



XCPEND |P*7|P*8 |P*9| 



APSTATOS 



AHCHAREA|SHRLKCNT| 



PROBSTRT 



6D0 
6E0 
| 6F0 
700 
710 



CHGREGS 



IROH370E | RESERVED/ 



0NSHRVM | P* 10 | P*1 1 | /////RESERVED///// 



STACKVM |UNSHRVM2 | ADMKCPE 1 RESERVED/ 



///////////RESERVED (cont) //////////// 



ALOKUM IARDCBLOKJ ALOKSP | AEXTSP 



ATMRSN | //////////RESERVED////////// 



MONREGS 



750| 



LOKSAVE2 



Hexadecimal Field 
Displacement Name 



Field Description, Contents, Meaning 



8 
C 

10 

14 



10 
18 
20 
28 
30 
38 
40 
48 
4C 
50 
54 
58 
60 
68 
70 
78 



Machine 


Jsaqe 




IPLPSW 


DS 


1D 




ORG 


IPLPSW 


RSRTNPSW 


DS 


1D 


RSRTOPSW 


DS 


1D 


IPLCCW1 


DS 


1D 




ORG 


IPLCCW1 


PSARSV3 


DS 


1F 


TRACSTRT 


DS 


1F 


TRACEND 


DS 


1F 


TRACCORR 


DS 


1F 


IPLCCW2 


DS 


1D 


EXOPSW 


DS 


1D 


SVCOPSW 


DS 


1D 


PROPSW 


DS 


1D 


MCOPSW 


DS 


1D 


IOOPSW 


DS 


1D 


CSW 


DS 


1D 


CAW 


DS 


1F 


QOANTOMR 


DS 


1F 


TIMER 


DS 


1F 


QUANTUM 


DS 


1F 


EXNPSW 


DS 


1D 


SVCNPSW 


DS 


1D 


PRNPSW 


DS 


1D 


MCNPSW 


DS 


1D 


IONPSW 


DS 


1D 



IPL start PSW 



Restart new PSW 
Restart old PSW 

IPL CCW 



Reserved for IBM use 

Address of start of trace table. 

Note that TRACSTRT is in absolute PSA 
Address of end of trace table. 

Note that TRACEND is in absolute PSA 
Address of next available trace table entry, 

Note that TRACCORR is in absolute PSA 

IPL CCW 

External old PSW 

SVC old PSW 

Program old PSW 

Machine check old PSW 

I/O old PSW 

Channel status word 

Channel address word 

Interval timer value at last interrupt 

13-microsecond interval timer 

Interval timer value at last dispatch 

External new PSW 

SVC new PSW 

Program new PSW 

Machine check new PSW 

I/O new PSW 
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PSA 



Hexadecimal 


Field 






Displacement 


Name 






80 


CPOLOG 


DS 


16D 






ORG 


CPOLOG 


80 




DS 


IF 


84 


INTEXF 


DS 


1F 



86 



BA 

BC 
E8 
F0 
F4 



Bits defined in INTEXF 
INTEX ~EQ0 INTEXF+2 



88 


INTSVCL 


DS 


1H 


8A 


INTSVC 


DS 


1H 


8C 


INTPRL 


DS 


1H 


8E 


INTPR 


DS 


1H 


90 


TREXADD 


DS 


1F 


94 


M0NCLA3S 


DS 


1H 


96 


PERCODE 


DS 


1H 


98 


PERADD 


DS 


1F 


9C 


MONCODE 


DS 


1F 


AO 




DS 


1D 


A8 


CHANID 


DS 


1F 


AC 


IOELPNTR 


DS 


1F 


BO 


ECSWLOG 


DS 


1F 


B4 




DS 


1F 


B8 


INTKFLIN 


DS 


1F 



Bits defined in INTKFLIN 
INTTIO~ EQO INTKFLIN+2 



INTMC 



INTRC 



DS 11F 

DS 1D 

DS 1F 

DS 1X 



Bits defined in INTRC 
exdresvd~eqo X 7 80« 

EXDCNO EQO X'10' 
EXDCCF EQO X'08« 



F5 




DS 


3X 


F8 


FAILSTAD 


DS 


1F 


FC 


REGNCODE 


DS 


1F 


100 


FXDLOG 


DS 


12D 


160 


FPRLOG 


DS 


4D 


180 


GRLOG 


DS 


16F 


1C0 


CRLOG 


DS 


16F 


200 


CPOSAGE 


DS 


OH 






ORG 


CPOSAGE 


200 


TEMPSAVE 


DS 


16F 






ORG 


TEMPSAVE 


200 


TEMPRO 


DS 


1F 


204 


TEMPR1 


DS 


1F 


208 


TEHPR2 


DS 


1F 


20C 


TEHPR3 


DS 


1F 


210 


TEMPR4 


DS 


1F 


214 


TEHPR5 


DS 


1F 


218 


TEHPR6 


DS 


1F 


21C 


TEMPR7 


DS 


1F 


220 


TEHPR8 


DS 


1F 


224 


TEMPR9 


DS 


1F 


228 


TEMPR10 


DS 


1F 


22C 


TEMPR11 


DS 


1F 



Field Description. Contents. Meaning 
Processor and storage logout area 



Reserved for IBM use 

External interrupt code (fullword) 



External interrupt code (halfvord) 

SVC instruction length code (ILC) 
SVC interrupt code 

Program instruction length code (ILC) 
Program interrupt code 
Translation exception address 
Monitor class 
PER code to be reflected 

Address of instruction causing PER interrupt 
Monitor code 
Reserved for IBM use 
Channel ID 

I/O extended logout (IOEL) pointer 
Limited channel logout (ECSW) 
Reserved for IBM use 

I/O interrupt key, flags, and interface 
address 



I/O interrupt device address (halfword) 

Reserved for IBM use 
Machine check interrupt code 
Reserved for IBM use 
External damage reason code 



Reserved for IBM use 
Channel not operational 
Channel control failure 

Reserved for IBM use 
Failing storage address 
Region code 

Fixed logout area 

Floating-point register logout area 

General register logout area 

Control register logout area 

End of machine usage; start of CP usage 



Temporary save area 



Registers 0-15 
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Hexadecimal Field 
Displacement Name 



230 
234 
238 
23C 
240 



240 
244 
248 
24C 
250 
254 
258 
25C 
260 
264 
268 
26C 
270 
27 4 
278 
27C 



TEMPR12 
TEMPR13 
TEMPR14 
TEMPR15 
BALRSAVE 



BALRO 

BALR1 

BALR2 

BALR3 

BALR4 

BALR5 

BALR6 

BALR7 

BALR8 

BALR9 

BALR10 

BALR11 

BALR12 

BALR13 

BALR14 

BALR15 



DS 
DS 
DS 
DS 
DS 

ORG 

DS 

DS 

DS 

DS 

DS 

DS 

DS 

DS 

DS 

DS 

DS 

DS 

DS 

DS 

DS 

DS 



1F 
1F 
1F 
1F 
16F 

BALRSAVE 

1F 

1F 

1F 

1F 

1F 

1F 

1F 

1F 

1F 

1F 

1F 

1F 

1F 

1F 

1F 

1F 



Field Description, Contents, Meaning 



BALR linkage save area 



Registers 0-15 



280 



FREESAVE DS 



16F 



DHKFRE save area 



280 
284 
288 
28C 
290 
294 
298 
29C 
2A0 
2A4 
2A8 
2AC 
2B0 
2B4 
2B8 
2BC 



FREER0 

FREER1 

FREER2 

FREER3 

FREER4 

FREER5 

FREER6 

FREER7 

FREER8 

FREER9 

FREER10 

FREER11 

FREER12 

FREER13 

FREER 14 

FREER 15 



ORG 

DS 

DS 

DS 

DS 

DS 

DS 

DS 

DS 

DS 

DS 

DS 

DS 

DS 

DS 

DS 

DS 



FREESAVE 

1F 

1F 

1F 

1F 

1F 

1F 

1F 

1F 

1F 

1F 

1F 

1F 

1F 

1F 

1F 

1F 



Registers 0-15 



2C0 
2F0 
2F8 
300 
308 



FREEWORK DS 
DATE DS 
TODATE DS 
STARTIME DS 
CPOID DS 



12F 

CL8 
1D 
1D 
1D 



DMKFRE work area 

Date - mm/dd/yy - edited EBCDIC 

TOD clock at hh.mm.ss today - local time 

Date and time started - TOD clock value 

Processor identification field 



308 
309 
30C 
30E 

310 
318 
320 
328 
330 
338 
33C 
340 
344 



ORG 
CPOVERSN DS 
CPOSER DS 
CPOMODEL DS 
CP0MCELL DS 

IDLEWAIT DC 
PAGEHAIT DC 
IONTWAIT DC 
PROBTIME DC 
RDNPSW DS 
RONOSER DS 
DSPLPSW DS 
RONCRO DS 
R0NCR1 DS 



CPOID 
1X 
3X 
2X 

1H 



Version code 

Processor serial number - packed unsigned 

Processor model number 

Maximum length in bytes of MCEL 



X^FFFFFFFFFFFFOOO 1 Total system idle wait time 
X^FFFFFFFFFFFFOOO* Total system page wait time 
X«7FFFFFFFFFFFF000' Total system I/O wait time 
X'7FFFFPFFFFFFF000' Total system problem state time 
1D PSW last loaded by dispatcher 

1F Address of dispatched VMBLOK 

1F Load PSW instruction used to dispatch 

1F Control register at dispatch 

1F Control register 1 at dispatch 
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Hexadecimal 


Field 






U-i «-t\1 3r>amanf 


Haag 






348 


CPSTAT 


DS 


1F 






nz>ei 


t*f iJ> XJ3. X 


348 


CPSTATOS 


DS 


1X 




Bits defined 
CPWAIT EQU 


in CPSTATU 
~X 7 80» 




CPRDN 


EQU 


X»40» 




CPEX 


EQU 


X'20* 




CPFVRUN 


EQU 


IMO 1 




CPSOPER 


EQU 


X»08* 


349 


XTHDLOCK 


DC 


1X 


34A 


CPSTAT2 


DC 


1X 




Bits defined 
CPMICAVL EQU 


in CPSTAT2 
X»80« 




CPMICON 


EQU 


X»40« 




CPSHRLK 


EQU 


X*20« 




CPSPMODE 


EQU 


*i i o i 




CPASTAVL 


EQU 


X'08» 




CP ASTON 


EQU 


X'04« 




CP370EAV 


EQU 


X»02» 




CP370EON 


EQU 


X'01« 



Ti *»1 fl npsr:rint-inn. frnitontR. Meaninrr 



34B 



CPSTAT3 DS 



1X 





Bits defined 
CPTIDLE~ EQU 


in CPSTAT3 
X*80» 




CPTPAGE 


EQU 


X»40« 




CPTIONT 


EQU 


X f 20» 


34C 


CPRESTRT 


DS 


1F 


350 


P6READ 


DS 


1F 


354 


PGWRITE 


DS 


1F 


358 


FGBAITIM 


nc 


1T\ 
■ is 


360 


PGWAITPG 


DS 


1D 


368 


PSASVCCT 


DS 


1F 


36C 


PAGELOAD 


DS 


1H P*1 


36E 


PAGERATE 


DS 


1H P*2 


370 


PSENDCLR 


DS 


OF 


370 


CPID 


DS 


1F 


374 


CPABEND 


DS 


1F 


378 


PSTARTSV 


DS 


OF 


378 


SYSIPLD7 


DS 


1H P*3 


37A 


PGSRATIO 


DC 


H«0« P*4 


37C 
380 
381 
388 
38C 
390 
394 
398 


ASYSVM 
ARSPPR 
IRSPPU 
ARSPRD 
ARIOPU 
ARIOPR 
ARIORD 
IPUADDR 


DC 
DC 
DC 
DC 
DC 
DC 
DC 
DS 


V(DHKSYSVM) 
V(DMKRSPPR) 
V(DHKRSPPU) 
V(DMKRSPRD) 
V(DMKRIOPU) 
V(DMKRIOPR) 
V (DMKRIORD) 
1H P*5 



CP running status 



CP running status 



CP in wait state 

CP running user in RUNUSER 

CP executing stacked request 

Reserved for IBM use 

Processor is executing in supervisor state 

System extending free storage if it is 

equal to X«FF f . Note that XTNDLOCK is in 
absolute PSA. 

Flag byte 



Virtual machine assist available on processor 
Virtual machine assist is on for system 
CP processing shared named system page 
CP is in single processor mode 
CP assist available on processor 
CP assist is on for system 
370E is available for the processor 
370E is enabled for use by all virtual 
machines 

Wait time accounting flag 



Timer contains idle time 
Timer contains page wait time 
Timer contains I/O wait time 

Restart address if external interrupt marks 

page invalid 
Total number of page reads 
Total number of page writes 
Time spent in page wait, multiplied by nusbei 

of pages waiting 
Reserved for IBM use 
Total number of user SVCs 
Page wait percent, last measurement 
Paging rate, pages per second 

Note that PAGERATE is in absolute PSA. 
End of area cleared by DMKCPINT 
CP running identifier. Note that CPID is 

in absolute PSA. 
CP abend code 

Start of save/restored code 
Device address of system IPL device 
Page steals/total replenished 
Address of system VMBLOK 
Address of system printer file chain. 
Address of system punch file chain. 
Address of system reader file chain. 
Address of system punch table. 
Address of system printer table. 
Address of system reader table. 
Instruction processing address 
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Hexadecimal Field 
Displacement Name 



39A 



PSAMSS 



DS 



1H 



P*6 



Bits defined in PSAMSS 
MSSPRES EQO X f 80 f 



39C 


ARSPAC 


DC 


Y(DIiKRSPAC) 


3A0 


AVMREAL 


DC 


A{0) 


3A4 


ASYSABND 


DC 


MO) 


3A8 


ASYSLC 


DC 


V(DMKSYSLC) 


3AC 


ASYSOP 


DC 


V(DHKSYSOP) 


3B0 


ARIOCT 


DC 


V(DMKRIOCT) 


3B4 


ARIOCH 


DC 


V(DMKRIOCH) 


3B8 


ARIOCO 


DC 


V(DMKRIOCO) 


3BC 


ARIODV 


DC 


V(DKKRIODV) 


3C0 


ARIOCC 


DC 


V(DHKRIOCC) 


3C4 


ARIOOC 


DC 


V(DMKRIOOC) 


3C8 


ARIODC 


DC 


V(DMKRIODC) 


3CC 


ACORETBL 


DC 


V(DMKSYSCS) 


3D0 


APAGCP 


DC 


A(X'FFFFFF') 


3D4 


CPCREG0 


DC 


X'8C8008C0 f 


3D8 


CPCREG6 


DC 


F«0« 


3DC 


CPCREG8 


DC 


F'0» 


3E0 


TIMEDISP 


DS 


1F 


3E4 


ASVCLIST 


DC 


V(DKKSVCNS) 


3E8 


AVMALIST 


DC 


V (DMKPRVMA) 


3EC 


LASTOSER 


DC 


V(DMKSYSVM) 


3F0 


PAGECOR 


DS 


1F 


3F4 


HONNEXT 


DS 


1F 


3F8 


PAGEND 


DS 


1F 


3FC 


PAGENXT 


DS 


1F 


400 


TRACEFLG 


DS 


1F 






ORG 


TRACEFLG 


400 


TRACFLG1 


DS 


1X 




Bits def 


ined 


in TRACFLG1 




TRAC01 


EQO 


X'80 f 




TRAC02 


EQO 


X'40' 




TRAC03 


EQO 


X"20« 




TRAC04 


EQO 


X'10' 




TRAC05 


EQO 


X«08' 




TRAC67 


EQO 


X'04 f 




TRAC08 


EQO 


X'02« 




TRAC09 


EQO 


X'01» 


401 


TRACFLG2 


DS 


IX 




Bits def 


ined 


in TRACFLG2 




TRACOA 


EQO 


X' 80» 




TRACOC 


EQO 


X»40' 




TRACOD 


EQO 


X'20« 




TRACBEF 


EQO 


X* 10* 




TRAC10 


EQO 


X f 08» 




TRAC11 


EQO 


X«04« 




TRAC12 


EQO 


X'02' 




TRAC13 


EQO 


X'OV 


402 


TRACFLG3 


DS 


1H 



Field Description, Contents, Meaning 
Address of HSS volume 



The HSS is online and the MSS 

communicator has been initialized 
Address of system accounting chain 
VMBLOK address of virtual=real user. Note 

that AVHREAL is maintained in both PSAs 
Address of system abend printer 
Address of SYSLOCS information 
Address of system operator VMBLOK 
Address of real channel index table 
Address of first RCHBLOK 
Address of first RCOBLOK 
Address of first RDEVBLOK 
Address of count of real system channels 
Address of count of real system control units 
Address of count of real system devices 
Address of system CORTABLE 
Address of first pageable program 
CP architecture control and external mask 
CP assist and virtual machine assist mask 
HONITOR CALL enable mask 
Timer displacement for charge 
Address of CP assist pointer list 
Address of expanded virtual machine assist 

pointer list 
Last user to be dispatched 
Current monitor buffer page address. 

Note that PAGECOR is in absolute PSA. 
Next available address in monitor buffer. 

Note that HONNEXT is in absolute PSA. 
Last address in current monitor buffer page. 

Note that PAGEND is in absolute PSA. 
Alternate monitor buffer page address. 

Note that PAGENXT is in absolute PSA. 
Trace table flags 



Trace table flag 



External interrupt tracing on 
SVC interrupt tracing on 
Program interrupt tracing on 
Hachine check tracing on 
I/O interrupt tracing on 
FREE/FRET call tracing on 
Enter dispatch tracing on 
Queue drop tracing on 

Trace table flag 



Run user tracing on 
Onstack I/O interrupt tracing on 
Virtual CSW stored tracing on 
SIO, TIO, and HDV tracing on 
Onstack IOBLOK or TRQBLOK tracing on 
Trace BTO activity for 370x NCP 
Lock spin tracing active 
Signal processor tracing active 

Reserved for IBM use 
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PSA 



Hexadecimal Field 
Displacement Name 



404 


TTSEGCNT 


DS 


1F 


408 


PSARSV15 


DS 


5D 


41C 


1SCHN 


DC 


F«0« 


420 


TRSVOID 


DC 


XL8«0» 


428 


AFSBACO 


DC 


7(DMKSYSAC) 


42C 


ARSPTA 


DC 


V(DHKRSPSP) 


430 


INSTWRD1 


DC 


F«0« 



Field Description, Contents, Meaning 

Count of total page/swap tables in system. 

Note that TTSEGCNT is in absolute PSA. 
Reserved for IBM use 
Chain of users enabled for VMSAVE 
Userid of V=R user before abend 
Address of account information block 
Address of DMKSPT Spool File chain 
Reserved for installation use 
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PSA 



Hexadecimal 


Field 






Displacement 


name 






6B0 


CHGREGS 


DS 


2F 


6B8 


R0N370E 


DS 


1F 


6BC 


RESERVED 


DS 


IF 


6C0 


OHSHRVM 


DC 


MO) 


6C4 


TRACPROC 


DC 


X'00» 


6C5 


APSTAT 


DS 


3X 






ORS 


APSTAT 


6C5 


APSTAT3 


DC 


X'00« 




Bits defined 


in APSTAT3 




CPSYSLK 


EQO 


X»80« 






ORG 


APSTAT 


6C6 


APSTAT4 


DC 


X'OO' 



Bits defined in APSTAT4 

CPLOKFL*" EQD X'80»~ 

RECMODE EQO X«40' 

CPHCHSE EQO X'20« 

PROCSCHK EQD XM0« 

CPAPRPND EQO X^S* 

POFFLINE EQO X , 04 l 



6C8 


RESERVE 


DS 


2F 


6D0 


STACK7H 


DC 


1(0) 


6D4 


ONSHRVM2 


DC 


MO) 


6D8 


ADHKCPE 


DC 


V(DMKCPE) 


6DC 


RESERVED 


DS 


5F 




PSECLR2 


DS 


OF 


6F0 


ALOKVM 


DC 


V(DMKLOKVM) 


6F4 


ARDCBLOK 


DC 


F'O' 


6F8 


ALOKSP 


DC 


V(DMKLOKSP) 


6FA 


AEXTSP 


DC 


V(DHKEXTSP) 


700 


ATMRSN 


DC 


V(DHKTHRSN) 


704 


RESERVED 


DC 


3F'0« 


710 


MONREGS 


DC 


16F 


750 


LOKSAVE2 


DC 


16F 




PSAEND 


DS 


OD 



Save area for charge synchronization 
370 STBYPASS V=R VMBLOK 
Reserved for IBS use 
VHBLOK for pending DMKVMAPs call 
(attached processor only) 
P*10 Processor identifier for CP trace table 
entries 
More attached processor status flag bytes 



Third attached processor status flag byte 



Other processor is spinning on lock 



P*11 Fourth attached processor status flag byte 



DMKLOK enabled for external interrupts 
Processor will record soft machine checks 
Machine check processing pending (CPMCHSE is 

the replacement of CPMCHLK in APSTAT2) 
TOD synchronous check received 
Automatic processor recovery pending 
Vary processor function in use 

Reserved for IBM use 

R11 for dispatcher unstacking 

R2 value for pending VMAPs call 

(attached processor only) 
Address of DMKCPE for IPCS use 
Reserved for IBM use 
End of second area cleared by CP 

initialization (DHKCPI) 
Entry to lock VMBLOK 
Pointer to first RDCBLOK (FB-512) 
Entry to spin on lock 
Entry to signal processor routine 
Entry to charge synchronization routine 
Reserved for IBM use 
Register save area for Monitor call 
Save area for switching to virtual 

machine in DMKLOK 

End of page usage 
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PWDIBLOK 



5IDIBLOK: PASSWORD INVALID BLOCK 

The PWDIBLOK is used to retain information about invalid passwords supplied with LOGON 
and AUTOLOG commands. 



10 



18 



1 


PWDOSEID 


■ 
i 




PWDDATE 


| PWDTIHE | 




PWDTIME (cont.) | 


PWDTEHMA | 


1 


PWDCHAIN | P*1 


P*2 | ///RESERVED//// | 

j 



Hexadecimal Field 
Displacement Name 




8 
E 
14 
18 
1C 
1D 



PIDOSRID DS 


CL8 


PWDDATE DS 


CL6 


PHDTIME DS 


CL8 


PWDTERHA DS 


CL4 


PWDCHAIN DS 


F 


PHDINVCT DS 


1X P*1 


PWDFLAGS DS 


11 P*2 


Bits defined 


in PWDFLAGS 



PWDLOG EQO X^O 1 
PHDALOG EQO X'W 



Field Description, Contents, Meaning 

Oserid attempting LOGON or AUTOLOG 

Date (mmddyy) 

Time (hh:mm:ss) 

Terminal address 

Address of next PWDIBLOK 

Invalid password count 

Flags 



This block for LOGON 
This block for AUTOLOG 



1E 



DS 



XL2 



Reserved for IBH use 
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5CHBLGK 



RCHBLOK; REAL CHANNEL BLOCK 

RCHBLOK contains status and type information for the specified channel. The linkage to 

I/O tasks operated on by that channel and to the control units attached to that channel 

is also maintained. The ARIOCH field of the PSA points to the first RCHBLOK, which is 
generated in contiguous storage. 



10 



18 



20 



1 -" ' - '"■ ' — - 

| RCHADD | RCHLOCK 


| R*1 


| R*2 | RCHQCNT 


i 


| RCHFIOB 


I 


RCHLIOB 




| R*3 I R*<* | R*5 | R*6 


I 


RCHSTIDC 




| RCHRSTQ 
i 


I 


RCHOPER 


i 



RCHCUTBL 



(Variable Length) 



Hexadecimal Field 
Displacement Name 



RCHADD DS 
RCHLOCK DS 
RCHSTAT DS 



1H 
1H 
1X 



R*1 



Field Description, Contents, Meaning 

Channel address 
Channel lock 
Channel status 



Bits defined in RCHSTAT 
RCHBOSY EQO " X«80'~ 
RCHSCED EQU X'40' 
RCHDED EQO X'01' 



RCHTYPE DS 



1X 



Channel busy 

IOB scheduled on channel 

Channel dedicated 

R*2 Channel type 



Sits defined in RCHTYPE 
RCHSEL EQO X»80» 
RCHBMX EQO X*4 0« 
RCHMPX EQO X'20« 
RCHFTA EQO RCHBMX 



Selector channel 
Block multiplexer channel 
Byte multiplexer channel 
File tape adapter "channel" 

Number of IOBLOKs queued off channel 
Pointer to first IOBLOK queued 
Pointer to last IOBLOK queued 
Channel data check count 
Channel control check count 
Interface control check count 
Channel chaining check count 
Result of STIDC instruction issued 
at CP initialization; if cc = 3, the 
content is X'FFFFFFFF* 
Address of channel to be restarted 
IOBLOK operational on channel time 
Control units attached - RCOSTART index 
(The index values must be multiplied 
by 8 and added to the beginning of the 
RDEVBLOK table (ARIODV) .) 

RCHSIZE EQO (*-RCHBL0K) /8 RCHBLOK size in doublewords (X«0D») 



6 


RCHQCNT 


DS 


1H 




8 


RCHFIOB 


DS 


1F 




C 


RCHLIOB 


DS 


1F 




10 


RCHDTCK 


DS 


1X 


R*3 


11 


RCHCCCK 


DS 


1X 


R*4 


12 


RCHIFCC 


DS 


1X 


R*5 


13 


RCHCHCK 


DS 


1X 


R*6 


14 


RCHSTIDC 


DS 


1F 




18 


RCHRSTQ 


DS 


1F 




1C 


RCHOPER 


DS 


1F 




20 


RCHCOTBL 


DS 


32H 
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RCDBLOK 



KCDBLOK: REAL CONTROL UNIT BLOCK 

RCDBLOK provides control and status information on a defined real control unit. Linkages 
are provided to queued IOBLOKs. The ARIOCO field of the PSA points to the first RCDBLOK, 
vhich is generated in contiguous storage. 



8 
10 
18 
20 
28 



r 


RCDADD | RCDLOCK I R* 1 


R*2 | RCDQCHT 


i 




RCDFIOB | 


RCDLIOB 






RCOCHA | 


RCOCHB 






RCOCHC | 


RCDCHD 






RCORSTQ | 


RCDOPER 






RCODVTBL 







(Variable Length) 



Hexadecimal Field 
Displacement Name 



RCDADD 


DS 


1H 


RCDLOCK 


DS 


1H 


RCDSTAT 


DS 


1X 


Bits def . 
RCDBOSY 


Lned 
"eqd 


in RCDSTAT 
X*80» 


RCDSCED 


EQD 


X'40' 


RCDDISA 


EQD 


X«20» 


RCOCHAOF 


EQD 


X f 08» 


RCOCHBOK 


EQD 


X»04» 


RCDCHCOF 


EQD 


X , 02' 


RCDCHDOF 


EQD 


X«01» 



RCOTYPE DS 



1X 



Field Description, Contents, Meaning 

Control unit address 
Control unit lock 
R*1 Control unit status 



Control unit busy 

IOB scheduled on control unit 

Control unit disabled 

RCDCHA to RCHBLOK path is not available 

RCDCHB to RCHBLOK path is not available 

RCDCHC to RCHBLOK path is not available 

RCDCHD to RCHBLOK path is not available 

R*2 Control unit type 



Bits defined in RCOTYPE 
RCOSHRD EQD X*80« 





RCOSOB 


EQD 


X«40« 




RC02703 


EQD 


X'03» 




RC02702 


EQO 


X»02' 




RC02701 


EQD 


X'01 1 


6 


RCOQCNT 


DS 


1H 


8 


RCDFIOB 


DS 


1F 


C 


RCDLIOB 


DS 


1F 


10 


RCOCHA 


DS 


1F 






ORS 


RCOCHA 


10 


RCOPRIME 


DS 


1F 



This control unit can be attached to only one 

subchannel 
This is a subordinate control unit 
TCD is a 2703 
TCD is a 2702 
TCD is a 2701 

Number of IOBLOKs queued off control unit 
Pointer to first IOBLOK queued 
Pointer to last IOBLOK queued 
Pointer to RCHBLOK - path A 



Pointer to the primary control unit 
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pr»n«r nir 



Hexadecimal Field 
Displacement Name 



14 


RCOCHB 


DS 


1F 


18 


RCOCHC 


DS 


1F 


1C 


RCOCHD 


DS 


1F 


20 


RCORSTQ 


DS 


1F 


2H 


RCOOPER 


DS 


1F 


28 


RCUDVTBL 


DS 


16H 



Field Description, Contents, Meaning 

Pointer to RCHBLOK - path B 

Pointer to RCHBLOK - path C 

Pointer to RCHBLOK - path D 

Address of control unit to be restarted 

IOBLOK operational on control unit time 

Devices attached - RDVSTART index 

(The index values must be multiplied 
by 8 and added to the beginning of the 
RDEVBLOK table (ARIODV) .) 



RCDSIZE EQD (*-RCUBL0K) /8 RCUBLOK size in doublewords (X»08«) 
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BCWTASK 

RCWTASK: TRANSLATED VIRTUAL IZQ CCH 

RCWTASK contains the virtual-to-real CCW translation and other data related to a virtual 
aachine's I/O operation. A pointer is Maintained to the virtual CCW operation. The first 
CCW- 16 points to the beginning of RCWTASK. 



I 
I 

8 I 

I 

10 | 



RCWPNT 



RCWVCAW 



RCWVCNT 



RCWRCNT 



RCWHEAD 



RCWCCHT 



RCWCCW 



(Variable Length) 



Hexadeciaal Field 
Displacement Name 






RCWPHT 


DS 


1F 


4 


RCWVCAW 


DS 


1F 


8 


RCWVCNT 


DS 


1H 


A 


RCWRCNT 


DS 


1H 


C 


RCWHEAD 


DS 


1H 


E 


RCWCCNT 


DS 


1H 


10 


RCWCCW 


DS 


1D 






ORS 


RCWCCW 


10 


RCWADDR 


DS 


1F 


14 


RCWFLAG 


DS 


1X 


15 


RCWCTL 


DS 


1X 



Field Description, Contents, Meaning 

Pointer to next RCWTASK 

Virtual address of CCW chain 

Virtual CCW count 

Real CCW count 

RCWTASK header Bark X»FFFF« 

RCWTASK control word count 

One or lore CCWs for device I/O 



CCW data address 

CCW flag bits 

CCW CP-control bits 



16 



10 



Bits defined in RCWCTL 
RCWIO EQU " X'80» 
RCWGEN EQO X«40» 
RCWHMR EQO X'20' 



RCWREL 


EQO 


X«10» 


RCWISAM 


EQU 


X»08« 


RCW2311 


EQU 


X'04« 


RCWINVL 


EQU 


X«02» 


RCWSHR 


EQU 


X«01» 


RCWCNT 


DS 


1H 




ORG 


RCWADDR 


RCWCOMND 


DS 


1X 



I/O data page locked 

CP-generated CCW 

DMKUNT Bust relocate hoae address/record R0 

and/or the block nuaber 
CCW address relocatable if CCWs aoved 
ISAM aodifying CCW 
TYP2311T-B pseudo 2311 on 2314 
CCW operation code or address is invalid 
Shared user page was copied 

CCW byte count 



CCW coaaand code 
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RDCBLOK 

| RDCBLOK; REAL DEVICE CHARACTERISTICS FOR FB-5J.2 DEVICES 

I The RDCBLOK is built dynamically at initial program load (IPL) time, or when a device is 

| varied online and contains FB-512 device- dependent characteristics. The RDEVRDC field of 

j the RDE7BL0K for each FB-512 device points to the RDCBLOK, RDCBLOKs are chained via 

| RDCFPNT. ARDCBLOK in PSA points to the first RDCBLOK built. 



I///RDCRSV1///I R*1 | R*2 | R*3 | R*4 | 



8 
10 
18 
20 
28 
30 
38 
40 



RDCRECSZ 



RDCBLKCG 



RDCBLKAP 



RDCBLKMA 



RDCBLKFA 



RDCBLKAA I RDCBLKCJE j kDCbOFLG \ RDCATHIK 



RDCATMAX I //RDCRSV2///I 



RDCPAGCG 



RDCPAGAP 



RDCPAGFA 



RDCFPNT 



RDCPAGMA 



RDCBLKPG 



I //////////HDCRSV3//////////// 



RDCPAGXT 



Hexadecimal Field 
Displacement Name 



RDCRSV1 DS 
RDCOPER DS 



1H 
1X 



R*1 



Bits defined in RDCOPER 
RDCOVRRN EQD X f 40» 
RDCBORST EQO X'20« 
RDCDATCH EQO X'10' 



RDCFEAT DS 



1X 



R*2 



Sil§ defined in RDCFEAT 
RDCREMOV EQO X^O 1 
RDCRRLSE EQO X«20' 
RDCMOVAM EQO X'08* 
RDCFIXAH EQO X'04« 



4 


RDCCLAS 


DS 


1X 


R*3 


5 


RDCTYPE 


DS 


1X 


R*4 


6 


RDCRECSZ 


DS 


1H 




8 


RDCBLKCG 


DS 


1F 




C 


RDEBLKAP 


DS 


1F 




10 


RDCBLKHA 


DS 


1F 




14 


RDCBLKFA 


DS 


1F 




18 


RDCBLKAA 


DS 


1H 




1A 


RDCBLKCE 


DS 


1H 




1C 


RDCBOFLG 


DS 


1H 




1E 


RDCATMIN 


DS 


1H 




20 


RDCATMAX 


DS 


1H 





Field Description, Contents, Meaning 

Reserved for IBM use 
Device operation modes 



Overrunnable device 
Burst mode device 
Data chaining support 

Device features 



Removable media feature 
Reserve/release feature 
Movable access mechanism 
Fixed access mechanism 

Device class 

Device type 

Physical record size 

Blocks per cyclical group (track) 

Blocks per access position (cylinder) 

Blocks under movable access 

Blocks under fixed access 

Blocks in alternate area 

Reserved for IBM customer engineer 

Number of buffered log bytes 

Minimum access time 

Maximum access time 
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RDCBLOK 



Hexadeciial Field 
Displacement Name 



Field Description, Contents, Meaning 

Reserved for IBM use 

Pages per cyclical group (track) 

Pages per access position (cylinder) 

Pages under movable access 

Pages under fixed access 

Blocks per page 

Pointer to next RDCBLOK 

Reserved for IBM use 

Define extent data for page supervisor 



Maximum block number on volume 
RDCSIZE EQU (*-RDCBLOK) /8 RDCBLOK size in doublewords (X'09») 



| 22 


RDCRSV2 


DS 


1H 


I 24 


RDCPAGCG 


DS 


1H 


I 28 


RDCPAGAP 


DS 


1F 


I 2C 


RDCPAGMA 


DS 


1F 


I 30 


RDCPAGFA 


DS 


1F 


I 34 


RDCBLKPG 


DS 


1F 


I 38 


RDCFPNT 


DS 


1F 


I 3C 


RDCRS73 


DS 


1F 


I 40 


RDCPAGXT 


DS 


4F 






ORG 


RDCPAGXT*12 


| 4C 


RDCBLKMX 


DS 


1F 
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RDEVBLOK 

RDEVBLOK; REAL DEVICE BLOCK 

RDEVBLOK is generated by the RDEV macro at system generation. There is one RDEVBLOK for 
each real device and one for each binary synchronous line. The block contains status and 
device parameters applicable to I/O instruction processing. The ARIOBV field of the PSA 
and the VDEVREAL field of the VDEVBLOK point to the first RDEVBLOK, which is generated in 
contiguous storage. 






RDEV ADD | RDEVLOCK | R*1 | 


R*2 \ R*3 | R*4 | 


8 


RDEVFIOB 




I 


RDEVLIOB ! 


10 


RDEVC0A 




I 


RDEVCDB | 


18 


RDEVQDED | 


20 


RDEVIOCT 




I 


RDEVAIOB | 


28 


RDEVUSER 




\ RDEVATT | RDEVCYL | 


30 






RDEVSER 


| RDEVLNKS | 


38 


RDEVTCTL 


(8 


device— dependent bytes) | 


40 


RDEVTMAT 




! R*5 ! 


R*6 | R*7 | R*8 | 


48 


RDEVIOER 




I 


RDEVCTRS | 


50 


RDEVNAME | //RDEVRSV1///I 


RDEVIOBL | 


58 
i 


RDEVRDC 

L 




I 


RDEVRSV2 | 

i 



Hexadecimal Field 
Displacement Name 



RDEVADD DS 
RDEVLOCK DS 
RDEVSTAT DS 



1H 
1H 
1X 



Field Description, Contents, Meaning 

Device address 
Device lock 
R*1 Device status 



Bits defined in RDEVSTAT 
rdevbusy~*equ ~ X*"80 f 



RDEVSCED EQU 
RDEVDISA EQU 
RDEVRSVD EQU 
RDEVISfi EQC 
RDEVNRDY EQU 
RDEVWAII EQU 
RDEVDED EQU 



X«40» 
X«20« 
X'10' 
X ! 08' 
X'04« 
X f 02* 
X«01« 



Device busy 

IOB scheduled on device 
Device disabled (offline) 
Device reserved 

Device in intensive error recording infle 
Device intervention required 
GRAF - IOBLOK pending, queue requests 
Dedicated device (attached to a virtual 
machine) 
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RDE7BL0K 



Hexadecimal Field 
Displacement Name 











5 


RDEVFLAG 


DS 


1X 




Bits defined 


in RDE7FLAG 




RDE7SK0P*" 


EQO 


X^O* 




RDE7PREF 


EQO 


X«40' 




RDE7SYS 


EQO 


X«20« 




RDE70WN 


EQO 


XM0» 




RDE7M00T 


EQO 


X'08« 




RDE73337 


EQO 


X«04» 




RDE7SEL 


EQO 


X»02« 




RDE7PS0P 


EQO 


X«80' 




RDE7PREP 


EQO 


X'40' 




RDE7ACT7 


EQO 


X'20' 




RDE7IDNT 


EQO 


X»10« 




RDEVENAB 


EQO 


X'08» 




RDEVHIO 


EQO 


X'04« 




RDEYDISB 


EQO 


X»02» 




RDEVEPMD 


EQO 


X»01« 




RDE7DRAN 


EQO 


x«80« 




RDEVTERH 


EQO 


X'40 1 






EQO 


X*20« 




RDE7SPAC 


EQO 


XM0« 




RDE7RSTR 


EQO 


x'08 1 




RDE7BACK 


EQO 


X'04* 




RDE7SEP 


EQO 


X«02» 




RDE7L0AD 


EQO 


X»01' 




RDE7LHCP 


EQO 


X«80« 




RDE7LCEP 


EQO 


X"40» 




RDE7SL0W 


EQO 


X'20 f 




RDE7A0T0 


EQO 


X»10» 




RDE7WAIT 


EQO 


X»08» 




RDE7EPLN 


EQO 


X , 04» 




RDE7RC7Y 


EQO 


X«02» 




RDE7TBTD 


EQO 


X'01' 


6 


RDE7TYPC 


DS 


1X 


7 


RDE7TYPE 


DS 


1X 


8 


RDE7FI0B 


DS 


1F 


C 


RDE7LI0B 


DS 


1F 


10 


RDE7C0A 


DS 


1F 


14 


RDE7CUB 


DS 


1F 


18 


RDE7Q0ED 


DS 


1D 


20 


RDE7I0CT 


DS 


1F 


24 


RDE7AI0B 


DS 


1F 


28 


RDE70SER 


DS 


1F 


2C 


RDE7ATT 


DS 


1H 


2E 


RDE7CYL 


DS 


1H 


30 


RDE7SER 


DS 


CL6 


36 


RDE7LNKS 


DS 


1H 


38 


RDE7TCTL 


DS 


8X 


40 


RDE7TMAT 


DS 


1F 


44 


RDE7QCNT 


DS 


1X 



Field Description, Contents, Meaning 
R*2 Device flags, device dependent 



DASD - ascending order seek queuing 

DASD - volume preferred for paging 

DASD - volume attached to system 

DASD - CP-owned volume 

DASD - volume mounted, not attached 

DASD - volume dedicated as 33307 

DASD - device selected for HSS mount 

Console - terminal has print suppress 

Console - terminal executing PREPARE command 

Console - IOBLOK pending; queue request 

Console - 2741 terminal code identified 

Console - device is enabled 

Console - next interrupt from a Halt I/O 

Console - device is to be disabled 

Console - 370x HCP resource in EP mode 

Spooling - device output drained 

Spooling - device output terminated 

Reserved for IBM use 

Spooling - force printer to single space 

Spooling - restart current file 

Spooling - backspace the current file 

Spooling - print/punch job separator 

Spooling - DCS buffer verified 

Special - network control program active 

Special - 270x Emulation program active 

Special - 370x in buffer slowdown mode 

Special - automatic dump/load enabled 

Special - IOBLOK pending; queue requests 

Special - emulator lines in use by system 

Special - automatic dump/load process active 

Special - BTO trace requested 

R*3 Device type class (see "Appendix A. 
CP and RSCS Equate Symbols") 

R*4 Device type (see "Appendix A. 
CP and RSCS Equate Symbols") 
Pointer to first IOBLOK queued 
Pointer to last IOBLOK queued 
Pointer to RC0BL0K - interface A 
Pointer to RC0BL0K - interface B 
IOBLOK queued time - TOD clock units 
Device I/O count 
Active IOBLOK 

Pointer to 7MBL0K of dedicated user 
Attached virtual address 
DASD - current cylinder location 
Device volume serial number 
DASD - number of links to this disk 
8 device-dependent terminal control bytes 
Device attached time - TOD clock word 

R*5 Number of queued IOBLOKs 
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RDE7BL0K 



Hexadecimal 


Field 






Displacement 


Name 






45 


RDE7STA2 


DS 


1X R*6 




Bits def ined 


in RDE7STA2 




RDE7RACT" 


EQO 


"~X T 80» 




RDE7B0CH 


EQO 


X«40« 




RDE7C0HC 


EQO 


X«20« 




RDE7DR0P 


EQO 


X*10* 




RDE7ALT 


EQU 


X«08« 




RDE?STBC 


EQO 


X»04« 




RDE7P0RG 


EQO 


X«02» 




RETRTSW 


EQO 


X'01 1 


46 


RDE7MDL 


DS 


1X R*7 


47 


RDE7FTR 


DS 


1X R*8 


48 


Kujswxujsn 


1/3 


419 

i j: 


4C 


RDE7CTRS 


DS 


1F 


50 


RDE7NAME 


DS 


1H 


52 


RDEfRS?1 


DS 


1H 


54 


RDETIOBL 


DS 


1F 


58 


RDEYRDC 


DS 


1F 


5C 


RDE7RS72 


DS 


1F 



18 
1C 

28 
2C 
2D 
2E 
2F 

30 



Field Description, Contents, Meaning 
Device status (byte 2) 



Active device is being reset 
Device is busy with the channel 
Contingent connection present 
Logdrop or loghold indicated 
Alternate path device 
Attention signal during active I/O 
3800 - Purge files in error 
Retry count switch 

Device model number 

Device feature code 

Pointer to XOERBLOK for last CP error 

Pointer to error counter control block 

Real device name 

Reserved for IBM use 

IOBLOK gueue lock 

Pointer to RDCBLOK (FB-512 only) 

Reserved for IBB use 

RDE7SIZE EQO (*-RDE7BL0K) /8 RDE7BL0K size in doublewords (X'OB 1 ) 



For CP-owned Devices 





ORG 


RDE70SER 


28 


RDE7ALLH DS 


IF 


2C 


RDE7C0DE DS 


1H 




0R5 


RDE7TCTL 


38 


RDE7PAGE DS 


1F 


3C 


RDE7RECS DS 


1F 


40 


RDE7PNT DS 


1F 




For Slotted : 

"org* 


2301 Paging 
RDEYRECS 


3C 


RDE7DCTL DS 


1F 




For Graphic Devices 

ORG RDE7CYL 


2E 


RDE7C0RD DS 


1H 


30 


RDE7GRTB DS 


1F 


30 


RDE7TMCD DS 


1X 



B it s defi ne d in R DE7TMCD 

RDE7TEXT~EQ0 X 7 20» 

RDE70SC8 EQO XM0* 

RDE7APLC EQO X«0C« 

RDE7APLP EQO X'08 1 

RDE7C0RR EQO X , 04« 

RDE7PTTC EQO X*00« 



Anchor for ALOCBLOK chain for this device 
Device code - STSOWNED index 

Anchor for RECBLOK chain for paging 
Anchor for RECBLOK chain for spooling 
Pointer to next RDE7BL0K for allocation 



Pointer to DROHTABL control block 



Current line coordinates 

Address of table of CCWs and data streams 

Terminal code 



3270 text character set 

ASCII-8 level 

APL Correspondence 

APL PTTC/EBCD 

Correspondence 

PTTC/EBCD 



For Spooling Onit Record Devices 



ORG 
RDE7SPL DS 
RDE7CLAS DS 

ORG 
RDE7DELP DS 
RDE7C0RP DS 

DS 
RDE7HAXP DS 
RDE7FSEP DS 

RDE7XSEP DS 




CL4 



Pointer to active RSPLCTL block 
Device class (es) 

Anchor for delay purge gueue 

Current page length in half inches 

Reserved for IBM use 

Maximum number of entries in delay purge gueue 

Function control block for separator 

page (6, 8, or 12) 
Hame of character arrangement table for the 

separator page 
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RDEVBLOK 



Hexadecimal Field 
Displacement Name 



34 


RDEVEXTN DS 


1A 


38 


RDEVIMAG DS 


CL8 


40 


RDEVOVLY DS 


CL4 




For Terminal 


Devices 




ORG 


RDEVQOED 


18 


RDEVCON DS 


1F 


1C 


RDEVAIRA DS 


1F 




ORG 


RDEVTCTL 


38 


RDEVRCNT DS 


1H 


3A 


RDEVTFLG DS 


1X 



3B 
3C 
3D 
3E 
3F 



46 



47 



1C 

2E 
30 
38 
3C 



Bits defined in RDEVTFLG 
RDEVLOG EQO X'80» 



RDE7REST 


EQO 


X«40» 


RDEVATOF 


EQO 


X«20« 


RDEVLOG 


EQO 


x»80« 


RDE7M0RE 


EQO 


X'40» 


RDEVRDN 


EQO 


X f 20» 


RDEYREAD 


EQO 


XMO' 


RDE7CPNA 


EQO 


X»08» 


RDEVTRQ 


EQO 


X«04» 


RDE7CTL 


EQO 


X , 02 l 


RDE7H0LD 


EQO 


X»01« 


RDE7GRTY 


DS 


IX 


RDE7LLEN 


DS 


1X 


RDE7ATHC 


DS 


1X 


RDE7BASE 


DS 


1H 


RDE7RS73 


DS 


1X 




ORG 


RDEVMDL 


RDE7TMCD 


DS 


1X 


Ii£s defined 


in RDEVTMC 


RDE7TEXT 


EQO 


X»20» 


RDEV0SC8 


EQO 


XMO' 


RDE7APLC 


EQO 


X'OC* 


RDE7APLP 


EQO 


X«08' 


RDE7C0RR 


EQO 


X«04' 


RDE7PTTC 


EQO 


X'OO' 




ORG 


RDEVFTR 


RDEVSADN 


DS 


1X 


For Real 


3705 


Communica 




ORG 


RDEVAIRA 


RDE7EPD7 


DS 


IF 




ORG 


RDE7CYL 


RDEVMAX 


DS 


1H 


RDEVNCP 


DS 


CL8 


RDE7NICL 


DS 


1F 


RDEVCKPT 


DS 


1F 



Field Description, Contents, Meaning 

Pointer to the 3800 extension 
Name of current image library 
Name of current forms overlay 



Pointer to CONTASK list 

Attention interrupt return address 

Start/stop line retry count 
Additional terminal flags 



TERM and GRAF - Logon process has been 

initiated 
TERM - Terminal in reset process 
TERM - Suppress attention signal 

GRAF - Logon process has been initiated 
GRAF - Screen full; more data waiting 
GRAF - Screen in running status 
GRAF - Read pending for screen input 
GRAF - Last input not accepted 
GRAF - Timer request pending 
GRAF - Control function interrupt pending 
GRAF - Screen full; in hold status 

Display alternate screen size index 

Device line length 

Device attention count 

370x base address for emulator line 

Reserved for IBM use 



Terminal code 



3270 Text character set 
ASCII-8 level keyboard 
APL Correspondence keyboard 
APL PTTC/EBCD keyboard 
Correspondence keyboard 
PTTC/EBCD keyboard 



Terminal set-address number 



Start of free RDEVBLOK list for EP line 

Highest valid NCP resource name 
Reference name of active 3704 NCP 
Pointer to network control list 
Pointer to CKPBLOK for re-enable 



30 
34 



30 



I2E 1270 Remote Support 
ORG RDEVNCP 
RDEVBSC DS IF 
RDEVPDLY DS IF 

For Spooling to Tape 

ORG RDEVSER 
RDEVSPT DS 1F 



Pointer to binary synchronous control block 
Poll delay timer interval 



Pointer to spool files to tape block 
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RECBLOK 

RECBLOK: DASD PAGE (SLOT) ALLOCATION BLOCK 

RECBLOK Maintains the correlation of DASD storage pages to a specific cylinder location^ 
Also maintained is a bit map to indicate the page slots available for data page storage. 
The RDEVRECS field and the RDE7PAGE field of the RDEVBLOK T>oint to RECBLOK* 



I 



RECPNT 



| RECCYL | R*1 | R*2 \ 
, 



RECMAP 



(128 pages maximum) 



Hexadecimal Field 
Displacement Name 






RECPNT 


DS 


1F 




4 


RECCYL 


DS 


1H 




6 


RECUSED 


DS 


1X 


H*1 


7 


RECMAX 


DS 


1X 


R*2 


8 


RECMAP 


DS 


1L 





Field Description, Contents, Meaning 

Pointer to next RECBLOK on chain 

Cylinder address for pages in this block 

Number of pages currently in use 

Maximum number of pages available 

Page allocation bit map (128 pages maximum) 

Bits defined in RECMA.E 

- Page is available 

1 - Page has been assigned 

Note: Although the size of RECMAP is fixed, the maximum number of pages 
available on a cylinder is device dependent. Bits corresponding to pages 
not physically present on a cylinder are set to 1. 

RECSIZE EQU (*-RECBLOK) /8 RECBLOK size in doublewords 



| • RECBLOK Extension for FB-512 Devices 



18 



20 



28 



1 


RECNRB 


| RECPRB | 




RECSTRT 


I RECEND | 


L 


RECALOF 


I/////////RECRSV1///////////I 

j 



Hexadecimal Field 
Displacement Name 



18 


RECNRB 


DS 


1F 




RECFORPT 


EQU 





1C 


RCPRB 


DS 


1F 




RECBAKPT 


EQU 


u 


20 


RCSTRT 


DS 


1F 


2H 


RECEND 


DS 


1F 


28 


RECALOF 


DS 


1F 


2C 


RECRSY1 


DS 


1F 



RECFSZ 



EQU 



Field Description, Contents, Meaning 

Pointer to next RECBLOK on ALOFBLOK chain 

Displacement to forward pointer 

Pointer to previous RECBLOK on ALOFBLOK chain 

Displacement to backward pointer 

Page number of first page in this extent 

Page number of last page in this extent 

Pointer to ALOFBLOK 

Reserved for IBM use 

(*-RECBLOK)/8 FB-512 RECBLOK size in doublewords 
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RECPAG 



SECPAG: ERROR RECORDING PAGE RECORD 

RECPAG retains up to 4K bytes of error recording data for eventual placement on the 
specified error recording cylinder. 



8 I 



RECCCPD 



| RECHXT | R*1 | R*2 | 
1 



RECDATA (4088 bytes) 



Hexadecimal Field 
Displacement Name 



RECCCPD DS 
RECHXT DS 
RECFLAG1 DS 

Bits defined 


4X 
2X 
1X 

in RECFLAG1 


RECPAGIU 
RECPAGFR 
HECPAGFL 
RECPAGER 
RECPAGFA 

RECFLAG2 


EQO 
EQU 
EQO 
EQO 
EQO 

DS 


X'80» 
X'40' 
X«20» 

X'10' 
X'08« 

1X 



Field Description, Contents, Heaning 

CCPD of the record 
Displacement to next error record 
R*1 Record usage flags 



Page contains valid data 

Page is cleared 

Page is full of error records 

Hext page is unreadable (I/O error) 

Page contains page frame records 

R*2 Record format flag 



Bits defi ne d in R ECFL AG2 
recpagfh'eqo X»80» 

RECPAGDN EQO X'00 f 
8 RECDATA DS 4088C 

RECPAGSZ EQO (*-RECPAG) /8 



Set in page 1 of a recording cylinder when 
the cylinder is being formatted. This flag 
bit is reset when all pages are cleared. 

Cylinder formatted 

Data area 

Size of page in doublewords (X , 512 l ) 
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SA7TABLE 

SAVTABLE; FIRST PAGE ON SAVED SYSTEM DASD 

S ATT ABLE is used in the initial program loading of saved virtual machine named systems. 
It is created by the name system generation process (SAVESYS macro/SAVESYS command). 



r' 

I 

i _____ .. 


SAVPSH 


i 


1 
8 I 

1 


SAT6RE5S 




48 | 

| .„.,_ ,. 


5A7FPRES 




68 | 

1 . 


SAVCRESS 




A8 i 
1 


SA7DATE 




BO | 
i 


SAVTIME 




1 
B8 | 


SAVNAME 




CO | 

1 ,,, 


SAVUSER 




C8 | 


SAVKEYS 





Hexadecimal Field 
Displacement Name 






SAVPSH 


DS 


1D 


8 


SAVGREGS 


DS 


16F 


48 


SAVFPRES 


DS 


4D 


68 


SAVCREGS 


DS 


16F 


A8 


SAVDATE 


DS 


CL8 


BO 


SAVTIME 


DS 


CL8 


B8 


SAVNAME 


DS 


CL8 


CO 


SAVDSER 


DS 


CL8 


C8 


SAVKEYS 


DS 


1H 



Field Description, Contents, Meaning 

PSW of virtual machine at SAVESYS time 

General registers 

Floating-point registers 

Control registers 

Date VMSAVE system was stored 

Time VMSAVE system was stored 

Name under which VMSAVE system was saved 

Oserid of user who stored the VMSAVE system 

Two-byte entry for each saved page 

containing storage keys for each page 
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SDRBLOK 



SDRBLOK; STATISTICAL DATA RECORDING BLOCK 



Contains counters to record temporary errors on a given I/O device. 



I 



SDRRDEV 



| S*1 | S*2 | S*3 | S*i\ 



8 
10 
18 



S*5 | SDRCDA 



I 
-J SDRCTRS r- 



I 

-J SDRCTRS1 



Hexadecimal Field 
Displacement Name 



16 



SDRRDE? DS 
SDRFLAGS DS 



1F 
1X 



S*1 



Bits defined in SDRFLAGS 
SDRSHRT EQO X»80» 



SDRRECD 


EQU 


X«40« 




SDRMAX 


EQO 


X f 20» 




SDRPRMCT 


DS 


1X 


S*2 


SDRFLCT 


DS 


1X 


S*3 


SDROVFWK 


DS 


1X 


S*U 


SDRLNGTH 


DS 


1X 


S*5 


SDRCDA 


DS 


3X 




SDRBSIZE 


EQO 


(*-SDRBLOK) 




SDRCTRS 


DS 


10X 




SDRSIZE 


EQD 


(*-SDRBLOK*7)/8 


SDRCTRS1 


DS 


10X 





Field Description, Contents, Heaning 

Address of associated RDEVBLOK 
SDRBLOK flags 



Short OBRRECN to be written 

Long OBRRECN to be recorded on counter 

overflow 
Maximum numbers of SDR counters handled 

Parameter list counter 
Full byte counter 
Statistical update work byte 
Length (bytes) of SDR counters 
Primary CDA of device being used 

SDRBLOK base size, in bytes 

SDR error counters 

Size in doublewords (X'OS 1 ) 

Additional SDR error counters for devices 
that use more than 10 SDR counters. 



SDRSIZE1 EQD (*-SDRBLOK) /8 Size in doublewords (X'Oa 1 ) 
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STOBLOK 

STOBLOK: SEGMENT TABLE ORIGIN CONTROL BLOCK 

STOBLOK contains inf ormation pertaining to the "shadow segient table" as well as the 
"shadow segment table" itself. The EXTSTOP field of the ECBLOK points to the first 

JiULiiiuu \su a. vuaxu> 






STONEXT 


I 


STOLAST 




T 


8 


ST0VCR1 


I 


ST0SHCR1 






10 


STOUSPT 


! 


STOOSPTL 






18 


STONXTOS 


I 


STOFSTOS 






20 


STOVRCR 


I 


STOSEGVR | 


STOPAGVR 




28 


STOSHLEN | 


STOVLEN | 


ST0$LKLN | 


S*1 | S*2 




30 




STOGAS 









58 | 



STOSHSEG 

(64 byte aligned shadow segment table 
from 64 to 1024 bytes in length) 



Hexadecimal Field 
Displacement Name 






STONEXT 


DS 


1F 


4 


STOLAST 


DS 


1F 


8 


ST0VCR1 


DS 


1F 


C 


ST0SHCR1 


DS 


1F 


10 


STODSPT 


DS 


1F 


14 


STOUSPTL 


DS 


1F 


18 


STONXTUS 


DS 


1F 






ORG 


STONXTOS 




STOVPSG 


DS 


1H 




STOVPPG 


DS 


1H 



1C 



STOFSTOS DS 



1F 







ORG 


STOFSTOS 




ST06CSG 


DS 


1H 




ST06CPG 


DS 


ie 


20 


STOVRCR 


DS 


1F 


24 


STOSEGVR 


DS 


1H 



Field Description, Contents, Meaning 

Pointer to the next STOBLOK 

Pointer to the last shadow table origin in 

the chain 
Virtual control register 1 ; segment table 

pointer 
Shadow control register 1 

Pointer to user area shadow page table pool 
Length of user area shadow table pool 
Pointer to next entry for user area shadow 

page table pool 

For V=R virtual machine in single 

processor mode 
Displacement to segment table entry for 

virtual prefix page 
Displacement to page table entry for 

virtual prefix page 

Pointer to first entry for user area shadow 
page table pool 

For V=R virtual machine in single 

processor mode 
Displacement to segment table entry for 

DIAGNOSE 6C address 
Displacement to page table entry for 

DIAGNOSE 6C address 

Reserved for IBM use 

Size of VV=VR area in the segment table 
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STOBLOK 



Hexadecimal Field 
Displacement Name 



26 


STOPAGVR DS 


1H 


28 


STOSHLEH DS 


1H 


2A 


ST07LEH DS 


1H 


2C 


STOBLKLM DS 


1H 


2E 


STOFLAG DS 


1X 



2F 
30 

58 



S*1 



Bits defined in STOFL AG 

porgesto~equ x»80»~ 
noptlb eqo x«40« 



STOSEGCT DS 
STOGAS DS 

STOSHSEG DS 



1X 

7D 

0D 



S*2 



STOSIZE EQO (*-STOBLOK) /8 



Field Description, Contents, Meaning 

Size of VV=VR area, last 7V=VR page table 
Length of shadow segment table (SEGTABLE) in 

bytes 
Length of virtual segment table (SEGTABLE) 

in bytes 
Length of shadow table origin block (STOBLOK) 

in doublewords 
Shadow table origin (STO) flag byte 



Purge shadow SEGTABLE 
Do not purge real table 

Count of SEGTABLEs above high-water mark 
Unused area to allow the SEGTABLE to be 

aligned on a 64-byte boundary 
Segment table will start between STOGAS and 

STOSHSEG when aligned 

STOBLOK size minus SEGTABLE size 
in doublewords 
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SWPTABLE 

SWPTABLE: SWAP TABLE FOR VIRTUAL MACHINE PAGING 

SWPTABLE is used in conjunction with the page table (PAGTABLE) and the segment table 
(SEGTABLE) by the CP page management routines for relating the virtual storage to DASD 
slots and real storage. The PAGSWP field of the PAGTABLE points to SWPTABLE. 



I 
I 



SWPVM 



I S*7 | 



SWPPAG 



8 | S*1 | S*2 | S*3 | S*4 | 
* I I I I 



SWPCYL | S*5 | S*6 | 
I I 



Hexadecimal Field 
Displacement Name 



SWPVM DS 
SWPFLAG2 DS 



1F 
1X 



S*7 



Bits defined in SWPFL AG 2 
SWPAPP EQO X'SO' 







ORG 


SWPFLAG2 




4 


SWPPAG 


DS 
ORG 


1F 
SWPFLAG2 




4 


SWPSEGNO 


DS 


1X 


S*7 


8 


SWPFLAG 


DS 


1X 


S*1 




Bits defined 
SWPTRANS EQO 


in SWPFLAG 
X'80* 






SWPRECMP 


EQU 


X»40« 






SWPALLOC 


EQD 


X'20» 






SWPSHR 


EQU 


X'10» 






SWPREF1 


EQU 


x'os' 






SWPCHG1 


EQU 


X«0'4« 






SWPREF2 


EQD 


X«02« 






SWPCHG2 


EQU 


X«01' 




9 


SWPVPAGE 


DS 


1X 


S*2 


A 


SWPKEY1 


DS 


1X 


S*3 


B 


SWPKEY2 


DS 


1X 


S*4 


C 


SWPCYL 


DS 


1H 




E 


SWPDPAGE 


DS 


1X 


S*5 


F 


SWPCODE 


DS 


1X 


S*6 



Field Description, Contents, Heaning 

Pointer to VMBLOK 
Swap table FLAG2 bits 



Attached processor's shared page table and 
swap table 



Pointer to page table 

Segment table index (o through 255) 
Swap table flag bits 



Page in transit 

Page permanently assigned 

Page enqueued for allocation 

Page shared 

First half-page referenced 

First half-page changed 

Second half-page referenced 

Second half-page changed 

Virtual page number within the segment 
Virtual storage key, first 2048 bytes 
Virtual storage key, second 2048 bytes 
DASD cylinder address 
DASD page number on cylinder 
RDEVBLOK device code 

(The device code is used as an index into 
the list of CP-owned paging volumes pointed 
to by DMKSYSOW) 



Note ; For each SWPTABLE there is only one doubleword that consists of SWPVM and SWPPAG 
followed by 16 entries (one for each PAGTABLE entry) that consist of s*1, S*2, S*3, S*4, 
SWPCYL, S*5, and S*6. Thus, the total size of the SWPTABLE is 17 doublewords. 
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IISLOCS: SYSTEM LOW STORAGE INFORMATION BLO CK 

SYSLOCS contains user logon and dial statistics, time/date and log Message data, TOD 
values, and line edit values. 






r 




DMKSYSDT | 


8 






DMKSYSTM | 


10 






DMKSYSLH | 


18 






| DMKSYSLG | 


20 




DMKSYSNM 


| DMKSYSMA | 


28 




DHKSYSHO 


| DMKSYSND | 


30 




DMKSYSLB 


| DHKSYSUD | 


38 




DMKSYSPL 


i //////////////////////////// i 


40 






DMKSYSDW | 


48 


I S*1 | S*2 | S*3 | S*4 | 


50 


I S*5 




I //////////////////////////////////// I 


58 


L - . 




DMKSYSCK | 

_ _ i 



Hexadecimal Field 
Displacement Name 






DMKSYSDT 


DC 


CL8»MM/DD/YY« 


8 


DMKSYSTM 


DC 


CLS'HHrMMrSS 1 


10 


DMKSYSLW 


DC 


X'OOSX'OO'jC 


1C 


DMKSYSLG 


DC 


MO) 


20 


DMKSYSNM 


DC 


F«0« 


24 


DMKSYSMA 


DC 


F«0' 


28 


DMKSYSMD 


DC 


F»0» 


2C 


DMKSYSND 


DC 


F«0» 


30 


DMKSYSLB 


DC 


A(0) 


34 


DMKSYSOD 


DC 


A(0) 


38 


DMKSYSPL 


DC 


A(0) 


3C 




DC 


A(0) 


40 


DMKSYSDW 


DC 


X«00 f ,X'00', 


4C 


DMKSYSLE 


DC 


X»7B» S*1 


4D 


DMKSYSLD 


DC 


X«4A' S*2 


4E 


DMKSYSCD 


DC 


X«7C S*3 


4F 


DMKSYSES 


DC 


X'7F' S*4 


50 


DMKSYSLL 


DC 


AL1(130,129,7 
S*5 


53 




DC 


XL5'0» 


58 


DMKSYSCK 


DC 


D»0» 



Field Description, Contents, Meaning 

Date of system log message 
Time of system log message 
L10» • 

Weekday of system log messages 

Pointer to first log message block 
Current number of users on the system 
Maximum number of users allowed on the system 
Maximum number of users on the system 
Number of dialed users on the system 
Pointer to user directory lock block 
Pointer to start of user directory on SYSRES 
Pointer to a list of virtual page buffers 
Reserved for IBM use 
CL10« 

Day of week in hexadecimal and EBCDIC 

Terminal line-end symbol 
Terminal line-delete symbol 
Terminal character-delete symbol 
Terminal escape symbol 
2,80) 

Default line lengths for 3210 and 3215 - 
2741 and 1050 - 3270 and 3066 terminals 

Reserved for IBM use 

TOD clock value last stored by 

accounting, DUMP, or machine check 
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SYSTBL 

SYSTBL: NAMED SYSTEM TABLE 

SYSTBL contains the system and DASD information required to load a saved systea by naae. 
SYSTBL is built during system generation in DMKSNT using the NAMESYS macro. 



10 



18 



20 



28 



30 



SYSPNT 



SYSSIZE 



SYSNAME 



VSYSRES 



SYSVADDR 



///SYSRSV1//I 



SYSVOL 



SYSLOC 



SYSSTART 



SYSPASCT 



I //////////SYSRSV2//////////// 



SYSPAGLN 



| S*1 | S*2 | 
1 



SYSPAGNM 
(Variable Length) 



SYSSEGLN | 
1 



SYSHRSEG 



(Variable Length) 



SYSUSR 



SYSRCVR 



Hexadecimal Field 
Displacement Name 






SYSPNT 


DS 


1F 


4 


SYSSIZE 


DS 


1F 


8 


SYSNAME 


DS 


CL8 


10 


VSYSRES 


DS 


CL6 


16 


SYSVADDR 


DS 


1H 


18 


SYSRSV1 


DS 


1H 


1A 


SYSVOL 


DS 


CL6 



20 



SYSLOC 



DS 



1F 



24 


SYSSTART DS 


1F 




28 


SYSPAGCT DS 


1F 




2C 


SYSRSV2 DS 


1F 




30 


SYSPAGLN DS 


1H 




32 


SYSSEQ DS 


1X 


S*1 


33 


SYSFLAG DS 


1X 


S*2 



Bits defined in SYSFLAG 
SYSPROT ~EQ0 X'80' 



Field Description, Contents, Meaning 

Chain pointer to next entry 

Minimum storage size needed to run system 

System name 

Volume identification number of DASD 

containing user's system 
Virtual address of VSYSRES 
Reserved for IBM use 
Volume identification number of DASD 

containing saved pages 
For count-key-data, the cylinder number on 

VSYSRES of user's system (cc ); for FB-512, 

the block number of user's system 

on VSYSRES (BBBB) . 
CCPD of first page on SYSVOL 
Total number of pages saved 
Reserved for IBM use 
Number of entries in SYSPAGNM 
VMSAVE priority sequence 
Named system flag 



Unprotected shared segments 



Section 1. CP Data Areas and Control Blocks 103 
Licensed Material — Property of IBM © Copyright IBM Corp. 1979 



Pg. of SY20-0884-3 Rev June 29, 1979 by Supp LD23-9035-0 for 5748-XE1 
SYSTBL 



Hexadecimal Field 
Displacement Nane 



34 



SYSPAGNM DS 



1F 



SYSSEGLN DS 1H 

SYSHRSEG DS 1X 

SYSUSB DS CL8 

SYSRCTR DS CL8 



Field Description, Contents, Heaning 

One fullword entry for each range of pages 

to be saved 
Numbers of entries in SYSHRSEG 
One byte for each segment to be shared 
VMSAVE owner userid* 
VMSAVE receiver userid 1 



*The displacement for this area depends on the preceding variables. 
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TNSEEC 

TNSREC: »T" TYPE RECORD FORMAT (ENVIRONMENTAL RECORDING) 

TNSREC is used by DMKIOE to record miscellaneous data records on CP's I/O error recording 
cylinders. The record contains sense data applicable to a specific I/O device. 



i 1 

I TNSKEYN | T*1 |/T*2//|/T*3/|/T*4/|///TNSSPE1/////// 



10 



TNSDTEN 



TNSTMEN 



TNSCPIDN 



18 | TNSDEVAD i 
| 

on i 



TNSVOLID 



^on co nafa 



(Variable Length) 



Hexadecimal Field 
Displacement Name 





24-By.te 


Beader 


Record 







TNSKEYN 


DS 


1H 




2 


TNSSWS1 


DS 


1X 


T*1 


3 


TNSSHS2 


DS 


1X 


T*2 


4 


TNSSWS3 


DS 


1X 


T*3 


5 


TNSRECNT 


DS 


1X 


T*4 


6 


TNSSPE1 


DS 


1H 




8 


TNSDTEN 


DS 


1F 




C 


TNSTMEN 


DS 


1F 




10 


TNSCPIDN 


DS 


2F 





Field Description, Contents, Meaning 



Class source 90=T type N/S NON TPER 

Switch byte 

Reserved for IBM use 

Reserved for IBM use 

Reserved for IBM use 

Reserved for IBM use 

Date 

Time 

Processor identification and model number 



End of 24-By.te Header 
2§ZiS§ 2®£®fiil§fi£ Data 



18 


TNSDEVAD 


DS 


1H 


1A 


TNSVOLID 


DS 


6X 


20 


TNSSNS1 


DS 


24X 


38 


TNSSNS2 


DS 


24X 


50 


TNSSNS3 


DS 


24X 


68 


TNSSNS4 


DS 


24X 


80 


TNSSNS5 


DS 


24X 


98 


TNSSNS6 


DS 


24X 


B0 


TNSSNS7 


DS 


24X 



Device address request is pending 

Volume identification number 

24 Sense bytes 

24 Additional sense bytes 

24 Additional sense bytes 

24 Additional sense bytes 

24 Additional sense bytes 

24 Additional sense bytes 

Last 24 sense bytes 
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TRQBLOK 



TRQBLOK: TOD CLOCK COMPARATOR REQUEST 



TRQBLOK manages the timing facilities of VM/370. 



10 



18 



20 



1 




TRQBVAL 








TRQBFPNT 


1 


TRQBBPNT 




I TRQBTOD | 




TRQBDSER 


1 


TRQBIRA 




L 




TRQBQUE 




j 



Hexadecimal Field 
Displacement Name 






TRQBVftL 


DS 


1D 


8 


TRQBFPNT 


DS 


1F 


C 


TRQBBPNT 


DS 


1F 


10 


TRQBTOD 


DS 


1D 


18 


TRQBDSER 


DS 


1F 


1C 


TRQBIRA 


DS 


1F 


20 


TRQBQUE 


DS 


1D 




TRQBSIZE 


EQU 


(* 



Field Description, Contents, Heaning 

TOD clock comparator value for interrupt 
Pointer to next TRQBLOK 
Pointer to previous TRQBLOK 
TOD clock value when TRQBLOK is queued 
Address of VMBLOK for user 
Interrupt return address 
Time left in queue; tracking virtual 
processor timer 



(*-TRQBL0K)/8 TRQBLOK size in doublewords (X'04«) 



• Local Graphic Device Support 

The following continuation of the TRQBLOK DSECT for local graphic device support is 
built, referenced, and released by DMKGRF. 



28 



TRQBCRT 



| TRQBDEV | T*1 | T*2 | 



30 | 



TRQBCPQ 



| T*3 I///////TRQBRSV1//////I 

i 



Hexadecimal Field 
Displacement Name 



28 
2C 

2E 



TRQBCRT DS 


1F 


TRQBDEV DS 


1H 


TRQBFLAG DS 


1X 



Bits defi ned in T RQB FLAG 
CRTFMT EQU X^SO' 
CRTDI&G EQU X'40* 

CRTALRM EQU X^O 1 
CRTWNG EQU X«10» 
CRTCARD EQU X'08 1 
CRTUSEWA EQU X»04« 

CRTAPL EQU X»02» 
CRTSIO EQU X«01» 
CRTAIO EQU CRTSIO 



2F 



TRQBLINE DS 



1X 



Field Description, Contents, Meaning 

Graphic device return IRA 
Graphic device device address 
T*1 Graphic device flags 



Screen formatted VH/370 online 

Screen written with Diagnose X f 19* command 

code 
Screen has alarm message 
Screen has MORE... warning 
Data from card reader 
ERASE/WRITE ALTERNATE or ERASE/WRITE is 

needed 
APL read buffer allocated 
User issue Diagnose to input area 
Timer interrupt pending after I/O completes 

T*2 Line coordinate for input area 
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TRQBLOK, UDBFBLOK 



Hexadecimal Field 
Displacement Name 



30 
34 



35 



TRQBCPQ DS 
TRQBFLG2 DS 



1F 
1X 



T*3 



Field Description, Contents, Meaning 

Deferred CONTASL queue 
Full screen support flags 



Bits defined in TRQBFLG2 fo r Full Screen Su pport 

CRTFSSA EQO X'80» System available 

CRTFSII EQD X'40» Input inhibited 

TRQBPAIR EQO X'20« Flag for PA1 key in full screen mode 



TRQBRSV1 DS 



3X 



CRTEXT EQO (*-TRQBCRT) /8 
CRTEXTSZ EQO *-TRQBCRT 



Reserved for IBM use 

Size of extension in doublewords 
Size of extension in bytes 



• Remote Graphic Device Support 

The following continuation of the TRQBLOK DSECT for remote graphic device support is 
built, referenced, and released by DMKRGA and DMKRGB. 



28 | 



TRQBCRT 



TRQBDEV 



| TRQNAME | 



Hexadecimal Field 
Displacement Name 



28 


TRQBCRT DS 


1F 


2C 


TRQBDEV DS 


1H 


2E 


TRQNAME DS 


1H 




TRQBPOLL EQO 


X'FF' 



Field Description, Contents, Meaning 

Graphic device return IRA 
Graphic device line address 
Resource identification 
Timer interrupt for general poll 



ODBFBLOK: OSER DIRECTORY BOFFER BLOCK 

ODBFBLOK is used as a buffer for user device block data in user directory access 
operations. 



38 



0DBFWORK 



ODBFVADD 



ODBFDASD 



Hexadecimal Field 
Displacement Name 




38 
3C 



Field Description, Contents, Meaning 

Buffer work space used by the caller 
Virtual address of the last directory page 
DASD address of the last directory page 

ODBFSIZE EQU (*-0DBFBL0K) /8 ODBFBLOK size in doublewords (X»08*) 



0DBFH0RK 


DS 


7D 


0DBF7ADD 


DS 


1F 


ODBFDASD 


DS 


1F 
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ODEVBLOK 

DDEYBLOK; USER DEVICE BLOCK 

ODEVBLOK supplies the information about the virtual Machine's virtual devices, the 
operational parameters for its use, such as DASD access passwords, read/write link mode, 
spool device, T-disk space versus dedicated device space, as well as other parameters. 



10 
18 
20 
28 
30 



ODEVADD | ODEVDISP | 


ODEVDASD | 


0*1 | 0*2 | 0*3 I 0*4 | 0*5 


| 0*6 |///0DEVRSV1//////| 


ODEVNCYL | 


0DEVRELH | 


///ODEVRSV2//I 


ODEVVSER | 


ODEVPASR 




ODEVPASW | 


ODEVPASM 





Hexadecimal Field 
Displacement Name 






ODEYADD 


DS 


1H 




2 


0DEYDISP 


DS 


1H 




4 


0DEYDASD 


DS 


1F 




8 


UDEYSTAT 


DS 


1X 


0*1 




Bits defined 


in ODEVSTAT 






0DEVDED 


EQO 


X'80« 






0DEVTDSK 


EQO 


X'40' 






0DEYL0NG 


EQO 


X«20» 






0DEYLKDV 


EQO 


X'10 f 






ODEVSPOO 


EQO 


X'08« 






0DEY3158 


EQO 


X«04« 






0DEVVRR 


EQO 


X'02» 




9 


ODEYMODE 


DS 


1X 


0*2 




Bits def. 


Lned 


in ODEYMODE 






ODEYLR 


EQO 


X'80' 






ODEVLI 


EQO 


X'40 f 






ODEVLM 


EQO 


X*20» 






ODEYR 


EQO 


00 






ODEYRR 


EQO 


04 






ODEVH 


EQO 


08 






ODEVWR 


EQO 


12 






ODEVM 


EQO 


16 






ODEVMR 


EQO 


20 






ODEVMW 


EQO 


24 




A 


ODEVTIPC 


DS 


1C 


0*3 


B 


ODEYIiPE 


DS 


1C 


0*4 


C 


ODEYFTR 


DS 


1C 


0*5 


D 


ODEYMDL 


DS 
ORG 


1C 

ODEYMDL 


0*6 


D 


ODEYCLAS 


DS 


1C 




E 


ODEYLINK 


DS 


1H 




10 


ODEVLKID 


DS 


1D 





Field Description, Contents, Meaning 

Virtual device address 
Displacement of the next block 
DASD address of the next block 
Device status information 



Device to be dedicated to this user 

T-disk to be allocated 

Device block is full length (6 doublewords) 

Device is to be linked (at logon) 

Device is a spool device 

Device is a 3158 console 

Virtual reserve/release requested 

Access mode information 



Read links allowed 
Write links allowed 
Multiple write links allowed 
Device to be in R link mode for owner 
Device to be in RR link mode for owner 
Device to be in W link mode for owner 
Device to be in WR link mode for owner 
Device to be in M link mode for owner 
Device to be in MR link mode for owner 
Device to be in HW link mode for owner 

Virtual device class 
Virtual device type 
Device feature codes 
Device model number 

Oser device block (short) 
Spool device output class 
Oser link to disk 
Oser link to userid 
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ODEVBLOK, ODIRBLOK 



Hexadecimal Field 
Displacement Name 



Field Description, Contents, Meaning 

Reserved for IBM use 

Virtual DASD size (cylinder or block) 

Virtual DASD relocation (cylinder or block) 

Reserved for IBM use 

Volume identification number 

Password for read access 

Password for write access 

Password for multiple access 

DDEVSIZE EQD (*-UDEVBLOK) /8 ODEVBLOK size in doublewords (X»06«) 



I E 


0DEVRSV1 DS 


1H 


| 10 


DDEVHCYL DS 


1F 


i 14 


DDEVRELN DS 


1F 


| 18 


DDEVRSV2 DS 


1H 


I 1A 


ODEVVSER DS 


6C 


| 20 


ODEVPASR DS 


1D 


| 28 


DDEVPASW DS 


1D 


| 30 


DDEVPASM DS 


1D 



SDIRBLOK: USER DIRECTORY BLOCK 

ODIRBLOK contains data describing the user's command privilege classes, special virtual 
machine options, terminal line edit values, and other values. 



I//UDIRRSV1///I 


ODIRDISP | 


ODIRDASD 


i 


8 I 


DDIROSER 






I 

i _ _ _ 


ODIRPASS 




j 



Hexadecimal Field 
Displacement Name 



Field Description, Contents, Meaning 

Reserved for IBM use 

Displacement of the user's OMACBLOK 

DASD address of the user's OMACBLOK 

Oserid 

User password 

ODIRSIZE EQO (*-0DIRBL0K) /8 DDIRBLOK size in doublewords (X'03') 






DDIRRSV1 DS 


1H 


2 


ODIRDISP DS 


1H 


4 


ODIRDASD DS 


1F 


8 


ODIROSER DS 


1D 


10 


ODIRPASS DS 


1D 
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OMACBLOK 

OHAGBLOK: USER MACHINE BLOCK 

OMACBLOK contains the logon parameters for one virtual machine user. This block provides, 
in addition to the linkage to the user's defined virtual machine device ODEVBLOK, the 
command privilege class, assigned line edit values, as well as other virtual machine 
options. 



10 
18 
20 
28 
30 



r _. 


OMACDVCT I OMACDISP | OHACDASD | 




U*1 | 0*2 | 0*3 


| 0*4 | 0*5 | 0*6 | 0*7 | 0*8 | 




0MACC0RE 


1 0MACMCQR j 


! OMACACCT ! 






0MACDIST | 


| DMACIPL ! 


i — 


0MACP0ID 


0*9 |/////////0MACRSV2///////////| 



Hexadecimal 
Displacement 



Field 
Name 



OMACDVCT DS 
OHACDISP DS 
OMACDASD DS 
OMACCLEV DS 



1H 
1H 
1F 
1C 



0*1 



Field Description, Contents, Meaning 



Number of devices 
Displacement of the next block 
DASD address of the next block 
Command level flags 



Bits defined in OMACCLEV 



OMACCLA 
OMACCLB 
OMACCLC 
OMACCLD 
OMACCLE 
OMACCLF 
OMACCLG 
OMACCLH 



EQO 
EQO 
EQO 
EQO 
EQO 
EQO 
EQO 
EQO 



OHACPRIR DS 
OMACOPT DS 



X'80' 

X'40 1 
x , 20 i 

XMO* 
X'08« 
X«04« 
X»02 f 
X«01» 

1X 
1X 



0*2 
0*3 



Privilege 
Privilege 
Privilege 
Privilege 
Privilege 
Privilege 
Privilege 
Privilege 



Class 
Class 
Class 
Class 
Class 
Class 
Class 
Class 



A functions 
B functions 
C functions 
functions 
functions 
functions 
functions 



H functions 



Virtual machine priority 
Virtual machine option flags 



B its defined in OMACOPT 

OMACISAM EQO X T 80« 

OMACECOP EQO X»40» 

OMACRT EQO X'20« 

OMACVROP EQO I'10' 

OMACACC EQO X'08 1 

OMACFST EQO X'04 1 

OMACNSVC EQO X«02« 

OMACBMX EQO X'01* 



ISAM CCW checking option 

Extended control mode option 

Real timer option 

Virtual = Real storage option 

Accounting card option 

Invalidate first shadow table entry 

SVCs not handled by virtual machine 

feature 
Virtual block multiplexer channel 



assist 
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OMACBLOK 



Hexadecimal Field 
Displacement Name 



34 



0MAC0PT2 DS 



1C 



0*4 



Bits defined in DMAC0 PT2 
OMACCPO EQD X«80» 





OMAC370E 


EQD 


X«20« 






OMACVMSV 


EQO 


X'10» 




c 


OMACLEND 


DS 


1C 


0*5 


D 


OMACLDEL 


DS 


1C 


0*6 


E 


OMACCDEL 


DS 


1C 


0*7 


F 


OMACES 


DS 


1C 


0*8 


10 


OMACCORE 


DS 


1F 




14 


OMACMCOR 


DS 


1F 




18 


OMACACCT 


DS 


1D 




20 


OMACDIST 


DS 


1D 




28 


OMACIPL 


DS 


1D 




30 


OMACPOID 


DS 


XL3 




33 


OHACAFF 


DS 


1X 


0*9 



Sii§ defi ned in OMACAFF 
OHACFFON EQO X«40» 
OHACFFAD DS 0BL6 



OHACRSVR DS 



1F 



Field Description, Contents, Meaning 
Virtual machine option flags 



Processor identification number on option 

statement 
370E assist in option statement 
VHSAVE on option statement 

Terminal line end symbol 

Terminal line delete symbol 

Terminal character delete symbol 

Edit escape symbol 

Virtual storage size in bytes 

Maximum virtual storage size in bytes 

Accounting information 

Oser machine distribution information 

Name of system to be IPLed at logon 

Processor identification number 

in binary 
Affinity and processor address 



Affinity specified 

Processor address for affinity 

Reserved for IBM use 



0MACSIZE EQO (*-0MACBL0K) /8 0MACBL0K size in doublewords (X'06 f ) 
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VCONCTL 

VCONCTL; VIRTOAL CONSOLE CONTROL BLOCK 

VCOHCTL contains CCW and data buffer information for the communications of the virtual 
console. The VDEVCOH field of the VDEVBLOK points to VCONCTL. 



10 



18 



20 



1 — 


VCONCAW | VCONBOF | 


| VCONCCW | 


| VCONBFSZ | V*3 |/ V*4//l VCONIDAP | 


| VCONRBOF | VCOHRCNT | V*5 |//V*6//| 


i — 


VCONWBOF | VCONWCNT | V*7 |//V*8//| 

— — j 



Hexadecimal Field 
Displacement Name 



10 
12 



13 
14 

18 
1C 
1E 
1F 
20 
24 
26 
27 



VCONCAW 


DS 


1F 


VCONBUF 


DS 


1F 


VCONCCW 


DS 


1D 




ORS 


VCONCCW 


VCONADDR 


DS 


1F 


VCONFLAG 


DS 


1X 


VCONDWC 


DS 


1X 


VCONCNT 


DS 


1H 




ORG 


VCONADDR 


VCONCOMD 


DS 


1X 


VCONBFSZ 


DS 


1H 


VCONFSS 


DS 


1X 


Bits defined 


in VCONFSS 


VCONALT 


EQO 


X«08» 


VCONMOD 


EQO 


X s 04* 


VCONRD 


EQO 


X'02« 


VCONWRT 


EQO 


X'01* 


VCONFSOP 


EQO 


X'OF 1 


VCONEWA 


EQO 


X«0D» 


VCONRMOD 


EQO 


X«06« 


VCONEWRT 


EQO 


X'05' 


VCONRSV3 


DS 


1X 


VCONIDAP 


DS 


1F 


VCONRBOF 


DS 


1F 


VCOHRCNT 


DS 


1H 


VCONRBSZ 


DS 


1X 


VCOHRSV6 


DS 


1X 


VCONWBUF 


DS 


1F 


VCONICNT 


DS 


1E 


VCONWBSZ 


DS 


1X 


VCONRSV8 


DS 


1X 



V*3 



V*4 



V*5 
V*6 



V*7 

V*8 



Field Description, Contents, Meaning 

Virtual address of user CCW 
Pointer to data buffer 
Current user CCW 



CCW data address 
CCW flag bits 
Diagnose write control 
CCW byte count 



CCW command code 

Data buffer size in doublewords 
Full screen diagnose flags 



Set to 1 when ERASE/WRITE ALTERNATE operation 

Set to 1 when modified operation 

Full screen read 

Full screen write 

Any full screen operation 

ERASE/WRITE ALTERNATE operation 

Read modified operation 

ERASE/WRITE operation 

Reserved for IBH use 

For indirect data addressing pointer 

to current IDAW 
Address of read data buffer 
Data count in read buffer 
Read buffer size in doublewords 
Reserved for IBH use 
Address of write data buffer 
Data count in write buffer 
Write buffer size in doublewords 
Reserved for IBH use 



VCONSIZE EQO (*- VCONCTL) /8 VCONCTL size in doublewords (X«04«) 
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VCOBLOK 



VCOBLOK: VIRTUAL CONTROL ONIT BLOCK 

VCOBLOK contains status information relating to the virtual channel, and the status and 
features of the virtual control unit- The VMCUSTRT field of the VMBLOK points to the 
first VCOBLOK. 



| VCOADD 
| 

8 I 



| VCODVINT | VCOINTS | V*1 | 7*2 



VCODVTBL 



Hexadecimal Field 
Displacement Name 






VCOADD DS 


1H 


2 


VCODVINT DS 


1H 


4 


VCOINTS DS 


1H 


6 


7CDSTAT DS 


1X 




Bits defined 


in VCOSTAT 




VCOCHBSY EQD 


x«80» 




7CDCEPND EQD 


X«40» 




VCOBOSY EQD 


X'20« 




VCOPEND EQO 


X'10« 




VCOCOEPN EQO 


x«08* 




VCOACTV EQD 


X'04' 


7 


VCDTYPE DS 


1X 



Bits defined in VCDTYPE 
VCOSHRD ~EQO X 7 80» 
VCDCTCA EQO X'^O 1 



Field Description, Contents, Meaning 

Virtual control unit address 
VDEVBLOK with interrupt - bit map 
Virtual control unit interrupt status 
V*1 Virtual control unit status 



Virtual subchannel busy 

Interrupt pending in subchannel 

Virtual control unit busy 

Virtual control unit interrupt pending 

Virtual control unit end pending 

Virtual control unit active 

V*2 Virtual control unit type 



Virtual control unit on shared subchannel 
Virtual control unit is a channel-to-channel 
adapter 



VCODVTBL DS 16H 

VCOSIZE EQO (*- VCOBLOK) /8 



Devices attached - VHDVSTRT index 
VCOBLOK size in doublewords (X^S 1 ) 
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VDEVBLOK 



VDEVBLOK: VIRTUAL DEVICE BLOCK 



VDEVBLOK aaintains status and interrupt conditions 
field of the VMBLOK points to the first VDEVBLOK. 



for one virtual device. The VHDYSTRT 



8 
10 
18 
20 
28 
30 
38 
40 



r — 1 

| VDEVADD | VDEVIHTS | 7*1 | V*2 | 7*3 | 7*4 | 


| VDEVCSff | 


| VDEVRELH | 7DE7BND | 7DE7P0SN | 


| 7DE7Q0ED | 7DE70PER | 


| 7DEVLINK j 7DE7REAL \ 


| 7DE7I0CT | 7DE70SER | 


| 7DE7I0ER | 7DE7I0B | 


| 7*5 |/////7DE7RES1/////| 7DE7RRB | 


| 7DE7RELF | VDEVBNDF | 

L J 



Hexadecimal 


Field 








Displacement 


Name 











7DE7ADD 


DS 


1H 




2 


7DE7INTS 


DS 


1H 




4 


7DE7TYPC 


DS 


1X 


7*1 


5 


7DE7TYPE 


DS 


1X 


7*2 


6 


VDEVSTAT 


DS 


1X 


7*3 




Bits def: 
VDEVCHBS* 


Lned 
"eqd 


in 7DE7STAT 

x^o* 






7DE7CHAN 


EQO 


X«40» 






7DE7BUSY 


EQD 


X«20« 






VDEVPEND 


EQD 


I«10' 






7DE7CUE 


EQD 


X«08« 






7DE7HRDY 


EQD 


X»Q4' 






7DE7CATT 


EQD 


X»02« 






7DE7DED 


EQO 


X'01' 




7 


7DE7FLAG 


DS 


1X 


7*4 




Bits defined 
7DE7RDCT EQO 


in 7DE7FLAG 
X«80« 






7DE7ENAB 


EQO 


X»80' 






7DE7TDSK 


EQO 


X'40» 






7DE7DIAL 


EQD 


X^O 1 






7DE7CSPL 


EQO 


X«40« 






7DE7231T 


EQO 


X'20 1 






7DE7231B 


EQO 


I«10' 






7DE7CCW1 


EQO 


X'10" 






VDEVSiS 


EQO 


X«08« 






7DE7DLY 


EQO 


X«08« 






7DE7DET 


EQO 


X»04« 






7DE7P0ST 


EQO 


X«02« 






7DE7RSRL 


EQO 


X'02' 






7DE7UC 


EQD 


X'OV 





Field Description, Contents, Heaning 

7irtual device address 
Virtual device interrupt status 
Virtual device type class 
Virtual device type 
Virtual device status 



Virtual subchannel busy 

Virtual channel interrupt pending 

Virtual device busy 

Virtual device interrupt pending 

Virtual control unit end 

Virtual device not ready 

Virtual device attached by console function 

VDEVREAL is dedicated device RDEVBLOK 

Virtual device flags 



DASD - read-only 

Virtual 270x - line enabled 

DASD - T-disk space allocated by CP 

Virtual 270x - line connected 

Console - activity spooled 

DASD - 2311 simulated on top half of 2314 

DASD - 2311 simulated on bottom half of 2314 

Console and spooling - processing first CCi 

DASD - Executing standalone seek 

Console - delay spooling 

Virtual device is being detached 

Present attention with a single interrupt 

Reserve/release are valid CCW operation codes 

Virtual device sense bytes present 
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VDEYBLOK 



Field Description, Contents, Meaning 



Hexadecimal 


Field 






Displacement 


Name 






8 


YDEVCSW 


DS 


1D 


10 


VDEYRELN 


DS 


1H 


12 


VDEVBND 


DS 


1H 


14 


VDEYPOSN 


DS 


1F 


18 


VDEVQOED 


DS 


1F 


1C 


?DE¥OPER 


DS 


1F 


20 


VDEYLINK 


DS 


1F 






ORS 


7DE7LINK 


20 


VDE7TMAT 


DS 


1F 


24 


7DE7REAL 


DS 


1F 


28 


7DE7I0CT 


DS 


1F 


2C 


7DE70SER 


DS 


1F 


30 


VDEVIOER 


DS 


1F 






ORG 


7DE7I0ER 


30 


7DE7SNSE 


DS 


1F 


34 


7DE7FCBK 


DS 


1F 


34 


7DE7I0B 


DS 


1F 


38 


7DE7FLG2 


DS 


1X 



39 
3C 
40 

44 



7*5 



B i£§ d efine d in 7DE7FLS2 
7DE7RRF EQO X»80« 
7DE7RES EQO X«40» 
7DE70DE EQO X'20' 

7DE7CPEX EQO X'10» 

7IRT0AL EQO X'01» 



7DE7RES1 DS 
7DE7RRB DS 
7DE7RELF DS 

7DE7BNDF DS 



3X 
1F 

1F 

1F 



7irtual channel status word 

7irtual DASD cylinder relocation 

7irtual DASD size (in cylinders) 

Yirtual DASD seek position 

7irtual SIO to real SIO queued time 

Device operational time 

Link to virtual shared devices 



T-disk attached time (TOD clock word 0) 

Pointer to real device RDE7BL0K 
7irtual device I/O count 
Pointer to 7MBL0K of 7DE7BL0K owner 
Pointer to IOERBLOK for last error 



Sense bytes for spool device 

Address of forms control block (7FCBBL0K) 

Pointer to active IOBLOK 
7irtual device flag byte 2 



Process virtual RESERVE/RELEASE commands 
Hinidisk reserved by 7DE70SER 
7DE7BL0K to get device when minidisk 

is released 
7irtual I/O waiting for release of 

minidisk 
7irtual device is known by the virtual 

machine as a 33307 

Reserved for IBH use 

Address of 7RRBL0K for RESER7E/RELEASE 

7irtual DASD (FB-512 only) relocation factor 

in the FB-512 blocks 
7irtual DASD size (FB-512 only) as number of 

FB-512 blocks 



7DE7SIZE EQO (*-7DE7BL0K) /8 7DE7BL0K size in doublewords (X»07») 



For Spooling/Console Devices 





ORG 


7DE7RELN 


10 


7DE7EXTN DS 


1F 


14 


7DE7SPAR DS 


1F 


18 


7DE7C0N DS 


1F 


1C 


7DE7SPL DS 


1F 


20 


7DE7CLAS DS 


1C 


21 


7DE7KEY DS 


1X 


22 


7DE70NIT DS 


1H 


24 


7DE7C0PY DS 


1H 


26 


7DE7CFLG DS 


1X 



Bits defined in 7DE7CFLG 
7DE7ATTN~EQ0 ~X T 80'~ 
7DE7TIC EQO X»40' 
7DE7TRAN EQO X'20» 

YDEYVCF EQO X'10 1 
VDEYAUCR EQO X«08» 



Pointer to spool extension block 
Spare pointer to spool extension block 
Pointer to VCOHCTL console control 
Pointer to VSPLCTL spool control 
Spool output class 
Storage key in use^s CAW 
Spool output directed device address 
Number of copies requested 
Console - virtual console flags 



Oser pressed Attention key two or more times 

Last CCH processed was a TIC 

Data transfer occurred during this channel 

program 
Virtual console function in progress 
Automatic carriage return on first read 
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VMBLOK 

VMBLOK: VIRTUAL MACHINE CONTROL BLOCK 

VMBLOK is used as the primary control block for almost all activities related to a single 
virtual machine. This block contains the following information: the dispatch and priority 
level of the virtual machine, the virtual machine's processor registers, preferred 



— J.™-! ../.LJ 



operations- The ASYSVM field of the PSA points to the system VMBLOK. 



0| VMQFPNT 
| 

8 I VMPNT 



10| 
I 

18| 
I 

20 i 



VMSEG 



VMCHSTRT 



VMDVSTRT 



28|VMVTERM I VMTRMID 



VMQBPNT 



VMECEXT 



VMSIZE 



VMCDSTRT 



VMTERM 



V*1 |V*2 |V*3 (V*4 



30|VMCHCNT | VMCUCNT 

| 

38| VMCHTBL 



VMDVCNT IVMIOACTV 



58|V*5 IV*6fV*7 IV*8 fV*9 I V*10 I V*1 1 1 V*1 2 
I 



60|V*13|V*14| V*15|V*16| 
I 



VMLOCKER 



68|V*19|V*20| VMIOINT | 

I 

70| VMVTIME 

I 

78| VMTMOOTQ 



VMTIMER 



80] 



88| 

I 

90j 

I 
98| 

I 

A0| 

I 

A8| 

I 
BO | 



F0| 



110| 

I 
118| 

I 
120| 



VMTTIME 



VMTHINQ 



7MTQDINQ 



VMINST 



|V*17|V*18 



VMTREXT 



VMADSTOP 



VMPSR 



VMGPRS 



VMFPRS 



VMUSER 



VMACNT 



VMDIST 



128 


r 

I VMPGREAD 




I 


'■ " i 

VHPGWRIT | 


130 


I VMWCNT IVMSEGDSP 


I 


VMSTOR | 


138 


| VMIOCNT 




I 


VMPNCH | 


140 


| VMLINS 




I 


VMCRDS | 


148 


I VMCOMND | 


150 


l/VMPDROM/l/VMPDISK/l VHPAGES | VMPRGIL | 


158 


IVMDEDCH IVMQPRIOR 


IVMWSPROJ |VMSTEALS| 


160 


I VMTIMEON 




I 


VMTRQBLK | 


168 


VMACOUNT 




I 


VMRDINQ | 


170 


VMPGRINQ 




I 


VMEPRIOR | 


178 


VMSTKO 




I 


VMMICRO | 


180 


VMPFONC 




I 


VMPXINT | 


188 


VMDELAT 




I 


VHRPRIOR | 


190 


VHPGPNT 




| VMNDCNT IVMSHRSYS! 


198 


V*21|V*22|V*26|V*27| 


VMASSIST | 


1A0 


VMCPNT 




| VMCPOID | V*25 | 


1A8 


VMLOCK 




I 


VMDFTPNT | 


1B0 


VM0SER1 




I 


VMDSER2 | 


1B8 


VM0SER3 




I 


VH0SER4 | 


1C0 


VMOHS 




I 


VMPCKP | 


1C8 


VMXPG |C*1 


|C*2 


| VMSTKCNTI VMPRRCTI 


1D0 


VMSWPMIG 




|C*3|C*4|V*28 |V*29| 


1D8I 


VHCPTIME | 


1E0! 


VMAPTIME | 


1E8| 


VMACTDEVI VMFLPAG 


|V*30|RSVD| VMCONLNI 


1F0 


VMCONBDF 




| V*31 | //RESERVED///I 


1F8| 


VMVP0 




I 


VMAIP | 


200 | 


VMASCCPD 




I 


VHASCHN | 


208| 
i 


VHASDISP IVHIPDISP 


|V*32|V*33| VMWSADJI 

j 
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Hexadecimal 


Field 






Displacement 


Name 









VMQFPNT 


DS 


1F 


4 


VMQBPNT 


DS 


1F 


8 


VMPNT 


DS 


1F 


C 


VMECEXT 


DS 


1F 




VHVCRO 


EQU 


VMECEXT 


10 


VMSEG 


DS 


1F 


14 


VMSIZE 


DS 


1F 


18 


VMCHSTRT 


DS 


1F 


1C 


VMCOSTRT 


DS 


1F 


20 


VMDVSTRT 


DS 


1F 


24 


VMTERM 


DS 


1F 


28 


VMVTERM 


DS 


1H 


2A 


VMTRMID 


DS 


1H 


2C 


VMTLEHD 


DS 


1C 


2D 


VMTLDEL 


DS 


1C 


2E 


7HTCDEL 


DS 


1G 


2F 


VMTESCP 


DS 


1C 


30 


VMCHCNT 


DS 


1H 


32 


VMCOCNT 


DS 


1H 


34 


VHDVCHT 


DS 


1H 


36 


VMIOACTV 


DS 


1H 


38 


VMCHTBL 


DS 


16H 


58 


VBRSTAT 


DS 


1X 




Bits defined 


in VHRSTAT 




vmcfwait" 


EQO 


X«80 T 




VMPGWAIT 


EQO 


X»40' 




VHIOWAIT 


EQO 


X»20» 




VMPSWAIT 


EQO 


X«10' 




VMEXWAIT 


EQO 


X f 08» 




VMLOGON 


EQO 


X'04« 




VMLOGOFF 


EQO 


X»02» 




VMIDLE 


EQO 


X«01» 



59 



Field Description, Contents, Meaning 

Pointer to next VMBLOK in queue 
Pointer to previous VMBLOK in queue 
Pointer (CYCLIC) to next VMBLOK 
VMBLOK extended control pointer - ECBLOK 



Virtual control register 
virtual machine 



for non-EC mode 



VMCPWAIT EQO 
VMNOROH EQO 
VHLONGWT EQO 

VMDSTAT DS 



Pointer to VMSEGTBL 

Virtual temporary storage size in bytes 

Pointer to VCHBLOK table 

Pointer to VCOBLOK table 

Pointer to VDEVBLOK table 

Pointer to RDEVBLOK for user terminal 

Displacement to virtual console VDEVBLOK 

Resource ID of real terminal if 370x 
V*1 Terminal line end symbol 
V*2 Terminal line delete symbol 
V*3 Terminal character delete symbol 
V*4 Terminal escape symbol 

Virtual channel count 

Virtual control unit count 

Virtual device count 

Active channel mask 

Channels attached - VMCHSTRT index 
V*5 Virtual machine running status 



Waiting - Executing console function 
Waiting - Paging operation (s) 
Waiting - Scheduled IOBLOK start 
Waiting - Virtual PSW wait state 
Waiting - Instruction simulation 
Oser not logged on 
Oser logging off 
Virtual machine in idle wait state 

VMCFWAIT+VMPGHAIT*VMIOWAIT+VMEXWAIT+VMLOGOFF*VMLOGON 

VMCPWAIT+VMPSWAIT 

VMCFWAIT+VML0G0H+VHL0G0FF4-VMIDLE 



1X 



Sits d ef ined in VMDST&T 

VMDSP EQO X'80« 

VMTSEND EQO 

VMQSEND EQO 

VMTIO EQO 

VHRON EQO 

VMINQ EQO 

VMELIG EQO 



VMPAZAPL EQO 



X«40» 
X'20' 
X'10» 
X'08 f 
X«04« 
X»02» 
X'01 1 



V*6 Virtual machine dispatching status 



Virtual machine is dispatched run user 
Virtual machine is compute bound 
Virtual machine in-queue time slice end 
Virtual machine is in TIO busy loop 
Virtual machine runnable 
Virtual machine in a queue 
Virtual machine in eligible list 
Ose dispatch path DHKDSPCH 
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Hexadecimal Field 
Displacement Name 

63 



64 
68 



69 



6A 
6C 
70 
78 
80 
88 



90 
98 

9E 

9F 

A0 

A4 

A8 

BO 

F0 

110 

118 

120 

128 

12C 

130 

132 

134 
138 
13C 
140 
144 
148 
150 
152 
154 
156 
158 



VMPEND 


DS 


1X 


Bits defined 
VMDEFSTK EQU 


in VMPEND 
X«80* 


VMPERPND 


EQD 


X«40» 


VMPRGPND 


EQO 


X«20 f 


VMSVCPND 


EQ0 


XMO' 


VMPGPND 


EQO 


X»08» 


VMRFLRST 


EQO 


X , 04« 


VMIOPND 


EQO 


X«02» 


VMEXTPND 


EQO 


X*01« 


VMLOCKER 


DS 


1F 


7HFSTAT 


DS 


1X 



Field Description, Contents, Meaning 
V*16 Interrupt pending summary flag 



Deferred task wait for system lock 
Virtual PER interrupt pending 
Virtual program interrupt deferred 
Virtual SVC interrupt deferred 
Virtual pseudo page fault pending 
Reflect a restart interrupt 
Virtual I/O interrupt pending 
Virtual external interrupt pending 



7*19 



B it§ defined in VMFSTAT 
VMFBMX EQO ~ X»80» 
VMFAOTO EQO X'40 1 
VMFVTMR EQO X«20« 
VMF370E EQO X«08' 



VMMLYL2 


DS 


1X 


Bits defined 


in VMMLVL2 


VMHIMSG 


EQO 


X'80' 


VMMHLITE 


EQO 


X«40» 


VMIOINT 


DS 


1H 


VMTIMER 


DS 


1F 


VMVTIME 


DS 


1D 


VMTM00TQ 


DS 


1D 


VMTTIME 


DS 


1D 


VMTMINQ 


DS 


1D 


VMTSOOTQ 


EQO 


VMTHINQ 


VMTODINQ 


DS 


1D 


VHINST 


DS 


3H 


VMOPRIOR 


DS 


1H 


VMPSWDCT 


DS 


1X 


VMTREXT 


DS 


1F 


VHADSTOP 


DS 


1F 


VHPSW 


DS 


1D 


VMGPRS 


DS 


16F 


VMFPRS 


DS 


4D 


VHOSER 


DS 


CL8 


VMACNT 


DS 


CL8 


VHDIST 


DS 


CL8 


VMPGREAD 


DS 


1F 


VMPGHRIT 


DS 


1F 


VHWCNT 


DS 


1H 


VMSEGDSP 


DS 


1H 


VMSTOR 


DS 


1F 


VHIOCNT 


DS 


1F 


VHPHCH 


DS 


1F 


VMLIHS 


DS 


1F 


VHCRDS 


DS 


1F 


VMCOMHD 


DS 


CL8 


VMPDROM 


DS 


1H 


VMPDISK 


DS 


1H 


VMPAGES 


DS 


1H 


VMPRGIL 


DS 


1H 


VMDEDCH 


DS 


1H 



Base address of holder of VMLOCK 
Virtual machine feature status 



Virtual block multiplexer channels 
Autopoll handshake option in use 
Oser requested virtual timer assist enabled 
370E is enabled for this virtual machine 

V*20 Additional message handling information 



Receiving all informational messages 
Highlite input redisplay 

I/O interrupt pending flags 

Virtual timer value - X f 50' 

Virtual processor time used 

Time remaining in queue 1 and/or queue 2 

Total time while in supervisor state 

VMTTIME value at entry to queue 

Supervisor time allowed (redefine label) 

TOD clock time stamp at queue entry 
Virtual machine privileged or tracing 
instruction 

V*17 Oser priority from directory 

V*18 Invalid LINK password count 

Address of extended trace control block 

Address of address stop control block 

Virtual machine PSH 

Virtual machine general purpose registers 

Virtual machine floating-point registers 

Virtual machine identification 

Virtual machine accounting number 

Virtual machine distribution code 

Total page reads 

Total page writes 

Page wait count 

Displacement of virtual machine SEGTABLE from 

start of block 
Permanent storage size (in bytes) 
Virtual SIO count for nonspooled I/O 
Virtual card count - spooled punch 
Virtual line count - spooled printer 
Virtual card count - spooled reader 
Last CP command executed 
Reserved for IBM use 
Reserved for IBM use 

Number of real pages currently resident 
ILC for latest program interrupt 
Mask for dedicated channel 
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Hexadecimal Field 
Displacement Name 



15A 


VHQPRIOR 


DS 


1H 




15C 


VHWSPROJ 


DS 


1H 




15E 


VHSTEALS 


DS 


1H 




160 


VHTIHEON 


DS 


1F 




164 


VHTRQBLK 


DS 


1F 




168 


VHACOONT 


DS 


1F 




16C 


VHRDINQ 


DS 


ip 




170 


VHPGRINQ 


DS 


1F 




174 


VMEPRIOR 


DS 


1F 




178 


VHSTKO 


DS 


1F 




17C 


VHHICRO 


DS 
ORG 


1F 

VHHICRO 




17C 


VHHCR6 


DS 


1X 




17D 


VHHADDR 


DS 


3X 






Bits defined 


in VHHCR6 






VHHFE 


EQO 


X'80' 






VMMPROB 


EQO 


X«40» 






VHHNOSK 


EQD 


X*20« 






VMH360 


EQO 


X«10« 






VHHSVC 


EQO 


X'08« 






VHHSHADT 


EQO 


X'04 f 






VHHCPAST 


EQO 


X*02' 






VHHVTMR 


EQO 


X'01' 




17D 


VMHADDR 


DS 


3X 




180 


VHPFONC 


DS 


1F 




184 


VHPXINT 


DS 


1F 




188 


VHDELAY 


DS 


1F 




18C 


VHRPRIOR 


DS 


1F 




190 


VHPGPNT 


DS 


1F 




194 


VHNDCNT 


DS 


1H 




196 


VHSHRSYS 


DS 


1H 




198 


VHRBSC 


DS 


1X 


7*21 


199 


VHCXSTAT 


DS 


1X 


V*22 



19A 



19B 
19C 



Bits defined in VHCXSTAT 

VHBCAOTH EQO X'80' 

VHIOLOG EQO X'20* 

VMVPOREL EQO I'10' 

VHINVTLB EQO X«08» 

VMSTBYPS EQO X«04» 

VMPOREL EQO X'02« 

VHSTFST EQO X'OV 

VHVCR14 EQO VHCXSTAT V*22 



VMAFF 



DS 



1X 



Bits defined in VHAFF 
VMAFFOH EQO X«40« 

VHAFFAD DS 0BL6 
VMLSTPRC DS 1X 
VHASSIST DS IF 



Field Description, Contents, Heaning 

Priority in dispatching queue 

Projected working set size 

Number of waits for stolen pages 

Logon time — TOD clock word 

Address of TRQBLOK for real timer 

Address of user ACCTBLOK 

Page read total (VHPGREAD) at queue entry 

Sum of virtual machine pages count at each 

page read 
Eligible list priority 
Console function output stack pointer 
Virtual machine assist - real control R6 



Control register 6 - hardware flag byte 
Control register 6 - address of virtual machine 



Virtual machine assist feature enabled 

Virtual machine in problem state 

Virtual machine assist does not handle SSK, 

or ISK 
S/360 operations only; no EC mode operations 

allowed 
Virtual machine assist does not handle SVCs 
Shadow tables present (EC mode and translate) 
CP assist feature enabled 
Virtual interval timer assist feature enabled 

Control register 6 - address of virtual 
machine's pointer list (HICBLOK) 

PFnn function table 

Extended external interrupt stack pointer 

TRQBLOK for delayed SLEEP or LOGOFF 

Run list dispatching priority 

Pointer to list of pages in PGBLOK 

Nondeferred page read count 

Number of shared named systems 

Remote display line count 

VHCF status byte 



VHCF active 

I/O logout mask bit from control register 

14. Referenced through VHVCR14. 
Diagnose 6C issued by user 
Invalidate real translate lookaside buffer 

before displacement 
Bypass shadow tables for V=R user 
Page relocated for V=R user 
Invalidate first shadow table entry 

Contains I/O logout mask bit from control 
register 14 (for both EC and BC mode). 
During EC mode, control register 14 data is 
also kept in the ECBLOK. 



V*26 Affinity request field 



Affinity set on 

Processor address 
V*27 Last processor executed in problen state 
Pointer to list of VHABLOKs 
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VMBLOK 



H«22.<tUt2^XBdx 

Displacement 


JC J.CLU 

Name 






no 


YMCPNT 


DS 


1F 


1A4 


7MCPUID 


DS 


32 


1A7 


7MN0ECPS 


DS 


1X 


1A8 


YMLOCK 


DS 


1F 


1AC 


7MDFTPNT 


DS 


1F 


1B0 


YMUSER1 


DS 


1F 


1B4 


VBOSER2 


DS 


1F 



Field Description, Contents, Meaning 

VMCBLOK anchor 

Processor Xu.entXjLj.cat3.on nususr in binary 
7*25 ECPS flag byte 

Lock word for compare and swap locking 
Deferred task pointer 
Reserved for installation use 
Reserved for installation use 



Section 1. CP Data Areas and Control Blocks 126.1 
Licensed Material — Property of IBM © Copyright IBM Corp. 1979 



Jane 29, 1979 



126.2 IBM VM/370 Data Areas ana Control Block Logic 



1B8 

1 -or« 

ICO 
1C4 
1C8 

1CB 
1CC 
1CE 
1D0 
1D4 
1D5 
1D6 

1D7 
1D8 
1E0 
1EA 
1E8 
1EC 



1ED 
1EE 
1F0 
1F4 



20D 
20E 
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VMBLOK 



Reserved for installation use 

Recent history of user processor utilization 

User page read checkpoint 

Maximum virtual aachine pages count in-queue 



VM0SER3 


DS 


1F 


VMHCPD/I 
IUU W J-I.U.-T 


nc 


IF 


VMOHS 


DS 


IF 


VMPCKP 


DS 


1F 


VMXPG 


DS 


1H 


7MQ2CHT 


DS 


1 A 


VMQ3CNT 


DS 


1X 


VMSTKCNT 


DS 


1H 


YMPRRCT 


DS 


1H 


VMSWPMIG 


DS 


1F 


VMFVRF 


DS 


1X 


VMCRTO 


DS 


1X 


VMSHRPRC 


DS 


1X 


YMGRFTAB 


DS 


IX 


VMCPTIME 


DS 


1D 


YMAPTIME 


DS 


1D 


VMFLPAG 


DS 


1H 


VMACTDEV 


DS 


1H 


VMSPMFLG 


DS 


1X 



C*2 



C*3 

C*4 

V*28 

Y*29 



V*30 



Bits defined in VMSPMFLG 
vmspmon" EQO "" X T 40» 
VMSMSGON EQO X»20« 



RESERVED 


DS 


1X 


VMCONLN 


DS 


1H 


YMCONBOF 


DS 


1F 


VHPSHDCA 


DS 


1X 



V*31 



Bits defined in VMPSWDCA 
VMNPWDCL~EQO X , 04' 



1F5 


RESERYED 


DS 


3X 


1F8 


VMVPO 


DS 


1F 


1FC 


VMAIP 


DS 


1F 


200 


VMASCCPD 


DS 


1F 


204 


YMASCHH 


DS 


1F 


208 


YHASDISP 


DS 


1H 


20A 


YMIPDISP 


DS 


1H 


20C 


VMSYSTAT 


DS 


1X 



V*32 



Bits defined in YMSYSTAT 
YMAS EQO X'SO 1 
YMASIPL EQO X«40« 

YMIPLDEV EQO X'20 1 



DS 
YHVSADJ DS 



1X 
1H 



V*33 



Count of consecutive Q2s allowed 

Count of stacked IOB plus CPEXBLOKs 

Processor related stacked CPEXBLOKs 

Pointer to pseudo page table 

SET FAVORED percentage for user 

COHPUTE/ELAPSED ratio 

Processor (sain or attached) whose shared 

segments were last used 
GRAF virtual console logical tab 
Main processor supervisor tiae 
Attached processor supervisor tiae 
Count of nonshared flushed pages 
Virtual device address for last virtual SIO 
VMCF special message flag 



Receiving special aessages 
Processing special aessages 

Reserved for IBM use 
Bytes left in response buffer 
Virtual address of response buffer 
Invalid AOTOLOG password count 



Virtual machine requests password suppression 

Reserved for IBM use 

Real address of virtual page 

Pointer to accounting interface area 

DASD page address of user page over IPL by 

device 
Chain of VMSAVE users 
System name table displacement for user 

with VMSAVE enabled 
System naae table displacement for user 

who has issued an IPL command to a system 

generated by VMSAVE 
Status of VMSAVE 



Enabled for VMSAVE 

IPL command issued for a system generated by 

VMSAVE 
IPL command issued to a device 

Reserved for IBM use 
Working set size adjusted 



VMBSIZE EQO (*-VMBL0K) /8 VMBLOK size in doublewords (X»38«) 
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THCBLOK 



VMCBLOK: VIRTUAL MACHINE COMMUNICATION BLOCK 

VMCBLOK contains data transfer and status information used by the Virtual Machine 
Communication Facility (VMCF) . The VMCPHT field of the VMBLOK points to VMCBLOK. 



10 



18 



20 



28 



30 



T 

| V*1 


I V*2 | VMCFONC 


I 


VMCMID 


i 


| VMCOSER | 




VMCVADA 


I 


VMCLENA 






VMCVADB 


I 


VMCLENB 




| VMCOSE I 




VMCFPNT 


| V*3 


| V*4 | V*5 


l/V*6//| 


L 




VMCTOD 




j 



Hexadecimal Field 
Displacement Name 






VMCSTAT 


DS 


1X 


V*1 




Bits defined 


in VMCSTAT 
X«80« 






VMCRESP 


EQU 






VMCRJCT 


EQ0 


X»40» 






VMCPRTY 


EQ0 


X^O' 




1 


VMCEFLG 


DS 


1X 


V*2 


2 


VMCFONC 


DS 


1H 




4 


VMCMID 


DS 


1F 




8 


VHCUSER 


DS 


1D 




10 


VMCVADA 


DS 


1F 




14 


VMCLENA 


DS 


1F 




18 


VMCVADB 


DS 


1F 




1C 


VMCLENB 


DS 


1F 




20 


VMCOSE 


DS 


1D 




28 


VMCFPNT 


DS 


1F 




2C 


VMCKEY 


DS 


1X 


V*3 


2D 


VMCCSTAT 


DS 


1X 


V*4 




Bits defined 


in VMCCSTAT 
~X«80«~ 






VMCCXINT 


EQU 






VMCCRECP 


EQO 


X«40» 






VMCCB0SY 


EQO 


X'20« 




2E 


VMCASTAT 


DS 


1X 


V*5 




Bits defined 


in VMCASTAT 





2F 
30 



VMCAAOTS EQO X«80 f 
VMCAPRTY EQO X»40» 
VMCAQIES EQO X'20» 



VMCRSB1 
VMCTOD 



DS 
DS 



1X 

1D 



Field Description, Contents, Meaning 
V*1 VMCBLOK user status 



Final response interrupt 
Message rejected 
Priority message 

Data transfer return code 

Subfunction code 

Message identifier 

Source and/or sink userid (VMOSER) 

Vaddr of message buffer 

Length of message 

Vaddr of reply buffer (SEND/RECV only) 

Length of reply buffer (SEND/RECV only) 

Oser-supplied doubleword 

Address of next VMCBLOK 

Oser PSW key 

VHCBLOK control status 



External interrupt VMCBLOK 
Transaction processed 
VMCBLOK busy 

VMCBLOK authorization status 



Authorized specific 
Authorized priority 
Oser is quiescent 

V*6 Reserved for IBM use 

TOD at authorization and/or build operation 



VMCBSIZE EQO (*-VHCBLOK) /8 VMCBLOK size in doublewords 

Red efi nition for Master VMCBLOK 

VMCACNT EQO VMCFONC Active message count 
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VHQBLOK 

VHQBLOK; VIRTUAL HACHINE QUEUE S CHEDULI NG BLOCK 

VMQBLOK provides scheduling information, queue pointers, additional data, and counters to 
the users in the eligible user list queue. 




8 
10 
18 
20 
28 
30 
38 
40 
48 
50 



r ' " ■ 


VHQTIHE 


■ 


| VHQNUH 


| VHQWNO |/////RESERV/////| 


| VMQHLST (F 


orward) | 


VHQWLST (Backward) | 


| VMQTOD | 


| VMQELP | 


| VHQWT | 


| VHQCPU J 


| VHQPGS | 


! VHQCNT 


! 


VHQPRD ! 


| VHQSTL 


I//////////RESERVD1/////////I 


I ////////////////////////RESER VD 2/////////////////////// 1 

i . — ^ -- „ ,_ _ _ _ _ : 



Hexadecimal Field 
Displacement Name 






VHQTIHE 


DS 


D 


8 


VHQNUH 


DS 


F 


C 


VHQWNO 


DS 


H 


E 


RSERV 


DS 


H 


10 


VHQWLSTA 


DS 


2A 


18 


VHQDATA 


DS 


8D 






ORG 


VHQDATA 


18 


VHQTOD 


DS 


D 


20 


VHQELP 


DS 


D 


28 


VHQWT 


DS 


D 


30 


VHQCPU 


DS 


D 


38 


VHQPGS 


DS 


D 


40 


VHQCNT 


DS 


F 


44 


VHQPRD 


DS 


F 


48 


VHQSTL 


DS 


F 


4C 


RESERVD1 


DS 


F 


50 


RESERVD2 


DS 


D 



Field Description, Contents, Meaning 

Time in queue; double precision twos 

complement for time-of-day units 
Number of users in this queue 
Number of VHBLOKs in eligible list 
Reserved for IBH use 
List address for eligible list 
Queue activity data 



In— queue time stamp 

In— queue time 

Time in-queue of eligible list 

In— queue processor use 

Estimated average page wait time in seconds 

Count of dropouts from queue 

In— queue pages read 

In— queue pages stolen 

Reserved for IBH use 

Reserved for IBH use 
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ABWSECT 



A BISECT: ABEND RECOVERY WORKSPACE 

ABWSECT describes the fields used for saving registers and other data during abend 
recovery. V-constants in DMSABN, DMSDBG, DHSFRE, DHSITI, DHSITP, and DMSITS point to the 
ABWSECT block. ABWSECT is defined in module DHSABW. 



40 



4C 



90 



48 | 



ABNREGS 



ABNPSW 



ABNRR 



ABNPAS13 



Hexadecimal Field 
Displacement Name 




40 
48 
4C 



ABNREGS 


DS 


16F 


ABNPSW 


DS 


D 


ABNRR 


DS 


F 


ABNPAS13 


DS 


18F 



Field Description, Contents, Meaning 

Registers at time of abend 
PSW at time of abend 
Temporary save area 
Area passed to nucleus routines 



94 
4C 



Space for DMSERR PLIST 

ORG ABNPAS13 
ABNERLST DS 47X 
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ADTSECT 

ADTSECT; ACTIVE DISK TABLE 

ADTSECT describes the attributes of virtual disks (A-G, S, I, Z) accessed by a virtual 
■achine via the ACCESS command. Space is allocated for the ADT when DMSHDC is assembled. 
In the ADT, certain fields are defined for use by both CMS and OS. For example, ADTHBCT 
field at displacement 1C (hexadecimal) into ADTSECT is also defined as OSADTVTA for use 
by OS simulation routines. ADTSECT is invoiced by the ADT macro. 



10 



18 



20 



28 



30 



38 



40 



48 



50 



58 



60 



68 



70 



78 



80 



88 



90 



98 



AO 



A8 



B0 



B8 



CO 



| ADTPTR 




1 

ADTBWPTR | 


| ADTDTA 




ADTFDA | 


| ADTDFP1 




ADTDFP2 | 


| ADTDFP3 




ADTHBCT | 


| ADTFSTC 




ADTCHBA | 


I ADTCFST 




ADTAMHO | 


| ADTAMHD 




OSADTSV1 | 


I ADTLEFT 




ADTLAST | 


I /////////////////////////// 


A*1 | A*2 | A*3 | h*H | 


I A*5 | A*6 | 


A*7 | A*8 


ADTDIOA | 


| ADTDIOB 




/////////////////////////// I 


| ADT2ND 




ADTAHP1 | 


I ADTAHP2 




ADTAMP3 | 


I ADTDAMAP 




ADTLHBA | 


| ADTLFST 




ADTANACW | 


| ADTARES 




ADTXNREC | 


| ADTXAREC 




ADTCHMAP | 


I /////////////////////////////////////////////////////// I 


I ADTIDEHT 




ADTID | 


I ADTID (cont.) 


| ADTVER | 


ADTDBSIZ | 


I ADTDOP 




ADTCYL | 


| ADTMCYL 




ADTNDH | 


| ADTOSED 




ADTFSTSZ | 


I ADTNFST 




ADTDCRED | 


I ADTCRED (cont. 


) I ////////////////////////////////////// I 
■ //////////// //•///////•/////////•/////i 


I/////////////// 


— ' ////////////////////////////////////// 1 



. /////////////////////////////////////////////////////// . 
. /////////////////////////////////////////////////////// . 
. /////////////////////////////////////////////////////// . 
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ADTSECT 



Hexadecimal 


Field 






Displacement 


Name 






I o 


Needed for Head-Only. Dis 
ADTPTR DS i~ 


I 4 


ADTBWPTR 


DS 


1F 


I 8 


ADTDTA 


DS 


A 


I c 


ADTFDA 


DS 


A 


I 10 


ADTDFP1 


DS 


A 


I 10 


ADTHFDN 


EQO 


ADTDFP1,4 


I 14 


ADTDFP2 


DS 


A 


I 14 


ADTMFDA 


FOO- 


ADTDFP2,4 


I 18 


ADTDFP3 


DS 


A 


! 1C 


ADTHBCT 


EQO 


IF 


i 20 


ADTFSTC 


DS 


1F 


| 24 


ADTCHBA 


DS 


1F 


| 24 


OSADTFST 


EQU 


ADTCHBA, 


| 28 


ADTCFST 


DS 


1F 


| 28 


OSADTVTB 


EQO 


ADTCFST, 


| 2C 


ADTAMHO 


DS 


1F 


| 2C 


ADT1ST 


EQO 


ADTAMHO, 4 


I 30 


ADTAMHD 


DS 


1F 


1 30 


OSADTDSK 


EQO 


ADTAMHD, 


I 34 


OSADTSV1 


DS 


1F 


I 38 


ADTLEFT 


DS 


1F 


1 3C 


ADTLAST 


DS 


1F 


I 40 




DS 


1F 



Field Description, Contents, Meaning 



Pointer to next ADT block in chain 
Address of previous ADT (BW chain) 
Device table address in HOCON 
File directory (PSTAT) address 
Directory file level 1 pointer 
lumber of doublewords in the master 
directory file 

Directory file level 2 pointer 
Address of master file directory 

Directory file level 3 pointer 
File status table hyperblock count 
Number of file status table entries 

in the directory 
Address of the current hyperblock 
Address of first OS file status table 

Displacement of current file status 

table entry 
Address of upper OS virtual table of 

contents 

Allocation map hypberblocks with 

next hole 
First empty record 

Displacement into hyperblock data 

of next hole 
OS disk address 

OS save area 
Number of records left 
Indicator for last record 
Reserved for IBM use 
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ADTSECT 



Hexadecimal Field 
Bisnlaceaent. Haae 



44 
45 



ADTH DS 1C 
ADTMX DS 1C 
»nTT?T.r:i n<; it 



»*^ 



Field Description. Contents. Meanincr 



A*1 Mode letter (A,B,C,.-.,X,Y,Z) 
A*2 Extension-of-mode letter (A,B,C,. 



,X,Y,Z) 



Pirct -Flan V»v4-o 



Bi ts defined in ADTFLG 1 

ADTFSF EQO X«80» 

ADTFRO EQO X*40* 

ADTFRW EQU X»20« 

ADTFFSTF EQO X«10« 

ADTFFSTV EQO X«08« 

ADTFQQF EQO X , 04« 

ADTROX EQO X»02» 

ADTFMIN EQO X«01' 



ADT block in free storage 
CMS read-only disk (attached and ready) 
CMS read/write disk (attached and ready) 
First FST hyperblock is in free storage 
FST hyperblocks are of varying lengths 
200-byte QQHSK is in free storage 
This disk has read-only extension (s) 
ADT block is minimum size 



47 



48 
48 



49 



AFTFLG2 DS 

Bits defined 
ADTFMFD ~EQO 
ADTFALNM EQO 
ADTFALTY EQO 
ADTFMDRO EQO 
ADTFALMD EQO 
ADTFALOF EQO 

ADTFROS EQO 
ADTPSTM EQO 
ADTFDOS EQO 



IX 



A*4 second flag byte 



in ADTFLS2 

X^O 1 MFD is in storage 

X^O 1 All filenames are in storage 

X^O* All filetypes are in storage 

I'10' Modes 1 through 5 are in storage 

ADTFMDRO+X«08« All modes (0 through 5) are in storage 

ADTFMFD+ADTFALNM+ADTFALTY*ADTFALMD 

All OFD is in storage 
X , 04» Indicates this is an OS disk 

X'02' ADT PSTAT chain modified 

X'01 1 Indicates this is a DOS disk 



ADT2ND 
ADTFLG3 



DS 
DS 



0D 
XL1 



Bits defined in ADTFLG3 
ADTOPD1 EQO X T 80» 
ADTFXCHN EQO X^O' 
ADTFRWOS EQO X^O 1 
ADTFSORT EQO XM0» 



ADTFORCE EQO X«08' 
ADTFHOAP EQO X*04« 



ADTFLG4 DS XL1 

Bits de fi n ed in ADTF L54 
ADTEDF EQO X»80« 
ADTEDFAE EQO X'40« 
ADTADDED EQO X«20« 



A*5 Third flag byte 



First half of OPDISK called 

Extra chain link (s) need to be returned 

Read/write OS or DOS disk 

All file status table hyperblocks 

and all file status table entries have 

been sorted 
CHS/DOS/OS disk forced to read-only 
For DMSAOT — do not abend if it is 

a disk error 



4A 


ADTFTYP 


DS 


XL1 A*7 


4B 




DS 


XL1 A*8 


4C 


ADTDIOA 


DS 


A(0) 


4C 


ADTFBABF 


EQO 


ADTDIOA, 2 


50 


ADTDIOB 


DS 


A (0) 


50 


ADTFBALB 


EQO 


1DTDI0B»4 


54 




DS 


1F 


58 


ADT2ND 


DS 


0D 


58 


ADTMSK 


DS 


1F 



A*6 Fourth flag byte 



Disk with enhanced disk format 
Enhanced-disk-format access erase done 
ADT added to ADT chain by ADTLKP 

File type flag byte 

Reserved for IBM use 

Disk constants table in DMSDIO 

FB-512 block to CHS block factor 

Sector number table in DMSDIO 
Last FB-512 block of the minidisk 

Reserved for IBM use 

800-byte (PQMSK) bit mask address 

or allocation map data hyperblock chain 
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ADTSECT 



Hexadecimal 


Field 






Displacement 


Nane 






5C 


ADTAMP1 


DS 


1F 


5C 


ADTQQM 


EQO 


ADTAMP1 


60 


ADTAMP2 


DS 


1F 


60 


ADTPQM1 


EQO 


ADTAMP2 


64 


ADTAMP3 


DS 


1F 


64 


ADTPQM2 


EQO 


ADTAMP3 


68 


ADTDAMAP 


DS 


1F 


68 


ADTPQH3 


EQO 


ADTDAMAP 


6C 


ADTLHBA 


DS 


A 


70 


ADTLFST 


DS 


1F 


74 


ADTANACW 


DS 


1F 


76 


ADTNACW 


EQO 


ADTANACW+2,2 


78 


ADTARES 


DS 


1F 


7A 


ADTRES 


EQO 


ADTARES+2,2 


7C 


ADTXNREC 


DS 


1F 


80 


ADTXAREC 


DS 


1F 


84 


ADTCHMAP 


DS 


1F 


88 




DS 


1D 




Hapj>ing . 


2f Volume Label 




"ds 


OD 


90 


ADTIDENT 


DS 


CL4 


94 


ADTID 


DS 


CL6 


9A 


ADTVER 


DS 


CL2 


9C 


ADTDBSIZ 


DS 


1F 


A0 


ADTDOP 


DS 


1F 


A4 


ADTCYL 


DS 


1F 


A8 


ADTMCYL 


DS 


1F 


AC 


ADTNOM 


DS 


1F 


BO 


ADTOSED 


DS 


1F 


B4 


ADTFSTSZ 


DS 


1F 


B8 


ADTNFST 


DS 


1F 


BC 


ADTDCRED 


DS 


CL6 


C2 




DS 


CL30 



ADTLABSZ EQO +-ADTIDENT 



Field Description, Contents, Meaning 

Allocation map level 1 pointer 
200-byte (PQQMSK) bit mask address 

Allocation map level 2 pointer 
Number of non-MFD mask bytes 

Allocation map level 3 pointer 
Number of bit mask bytes 

De-allocation map hyperblock chain 
Number of doublewords in PQMSK 

Pointer to last file status table hyperblock 
Displacement of last file status 

table in last hyperblock 
Alternate number of active write files 
Number of active write files 
Alternate reserve count 
Reserve count (RESRVCNT) 

Number of doublewords of extra chain 

link records 
Address of block of extra chain 

link records 
Change map hyperblook chain 
Reserved for IBM use 



Volume start and/or label identification 

Volume start and/or volume identification 

Version level 

Disk block size 

Disk origin pointer 

Number of formatted cylinders on disk 

Maximum number of formatted cylinders 

on disk 
Disk size in blocks 
Number of disk blocks in use 
Size of file status table 
Number of file status tables per block 
Disk creation date (X'yymmdahhmmss' ) 
Reserved for IBM use 

Length of the label portion 



Mapping of OS Field in V olu me Label 



ORG 
OSADTVTA EQO 
ADTLBH EQO 
ADTLDM EQO 
ADTLB EQO 
ADTLD EQO 



ADTIDENT 

ADTIDENT* 11, 5 VTOC address of OS pack 

ADT2ND-ADTSECT Length of minimum ADT block in bytes 

ADTLBH/8 Length of minimum ADT block in doublewords 

♦-ADTSECT Length of full ADT block in bytes 

(ADTLB*7)/8 Length of full ADT block in doublewords 



0£h££ Par amete rs 
ADTRL ~EQ0 800 
ADTMXBML EQO 10 



Logical record length 
Maximum bit map length (number of 
records) for 3330 

N0C0N Device Table D ispl acements 

DTAD EQO 0,2 Device number 

DTADC EQO 2,1 Device class 

DTADT EQO 3,1 Byte to indicate device type 

DTAS EQO 4,4 Symbolic device name 
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V/JL *} X *.\l 



-T,,~~ OQ 



5748— XE1 
AFTSECT 



AFTSECT: ACTI?I Ilil TABLE 

AFTSECT is used to describe a file currently open for a read or write- The AFT is created 
when a file is opened. Space for up to five AFTs is available in DMSNUC; any others Bust 
reside in free storage. AFTSECT is invoked via the AFT aacro. 





8 

10 

18 



AFTPTR 



AFTADT 



AFTCLD 



| AFTCLN 



AFTCLA 



AFTDBD 



AFTDBN 



AFTDBA 



AFTCLB 



18 



20 



28 



30 



40 



48 



50 



58 



60 



68 



70 



78 



80 



88 



90 



98 



A0 



A8 



B8 



CO 



C8 



DO 



| AFTUFP5 






I 


AFTUFP4 




| AFT0FP3 






I 


AFTOFP2 




I AFT0FP1 






I 


AFTRDBLK 




| AFTRDID 






I 


AFTLSTRC 




! AFTARP 






I 


AFTAWP 




| AFTPHYP 






I 


AFTSVBLK 




| AFTSVBLK 


(cont. 


) 


I 


AFTSVFP4 




| AFTSVFP4 


(cont. 


) 


I 


AFTSVFP3 




| AFTSVFP3 


(cont. 


) 


I 


AFTSVFP2 




I AFTSVFP2 


(cont. 


) 


I 


AFTSVFP1 




| AFTSVFP1 


(cont. 


) 


I 


AFTOBFAD 




I AFTOBFLG 






I 


AFTHXBLK 




| AFTBLKHD 






I 


AFTEBLIH 




| AFTEBDSP 






I A*1 


| AFTPFST | 


I AFTIN | AFTID 




I 


AFTFCLA 




I AFTFCLX | AFTCLD2 




I A*2 


| //A* 3// | 


AFTOCLDX | 


I AFTN | 


I AFTT | 


I AFTD 






I 


AFTWP 


| AFTRP | 


i X TTi m M i H 

| ilJf x n j i 


lFTIC 




i 


AFTFCL 


| &*4 j A* 5 I 


I AFTIL 






I 


AFTDBC 


| AFTYR | 


I AFTFOP 






I 


AFTADBC 




I AFT&IC 






I A*6 


I A*7 | 


AFTADATI | 


I AFTADATI 

L_ _ _ 


(cont. 


) 


I //////RESERVED///////////// | 
_ j 
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1FTSECT 



Hexadeci 


mal 


Fieia 






Displacement 


Name 











AFTPTR 


DS 


F 






Bits def 
AFTFSF 


ined 
EQU 


in AFTPTR 
X»40» 


4 




AFTADT 


DS 


F 


8 




AFTCLD 


DS 


H 


A 




AFTCLN 


DS 


H 


C 




AFTCLA 


DS 


F 


10 




AFTDBD 


DS 


H 


12 




AFTDBN 


DS 


H 


14 




AFTDBA 


DS 


F 


18 




AFTCLB 


DS 


XL80 



ORG AFTCLB 
Field redefined for EDF 



18 


AFTOFP5 


DS 


F 


1C 


AFTOFP4 


DS 


F 


20 


AFTDFP3 


DS 


F 


24 


AFTDFP2 


DS 


F 


28 


AFTOFP1 


DS 


F 


2C 


AFTRDBLK 


DS 


F 


30 


AFTRDID 


DS 


F 


34 


AFTLSTRC 


DS 


F 


38 


AFTARP 


DS 


F 


3C 


AFTAWP 


DS 


F 


40 


AFTPHYP 


DS 


F 


44 


AFTSVBLK 


DS 


2F 


4C 


AFTSBFP4 


DS 


2F 


54 


AFTSBFP3 


DS 


2F 


5C 


AFTSBFP2 


DS 


2F 


64 


AFTSBFP1 


DS 


2F 


6C 


AFTAUBFD 


DS 


F 


70 


AFTUBFLG 


DS 


F 



Bits defined in AF TUBFLG 
AFTOVLAP EQD ~ X'SO* 



74 


AFTMXBLK 


DS 


F 


78 


AFTBLKWD 


DS 


F 


79 


AFTBFORM 


EQD 


AFTBLKWD* 1,1 


7A 


AFTPRCT 


EQD 


AFTBLKWD+2,2 


7C 


AFTEBLIN 


DS 


F 


80 


AFTEBDSP 


DS 


F 


84 


AFTFLG 


DS 


X A* 




Bits defined 


in AFTFLG 




AFTOSED 


EQU 


X«80» 






EQD 


X^O* 




AFTICF 


EQU 


X'20» 




AFTFBA 


EQU 


X«10« 




AFTDBF 


EQU 


x»08» 




AFTWRT 


EQU 


X»04» 




AFTRD 


EQU 


X'02 1 




AFTFDLD 


EQU 


X«01« 


85 


AFTPFST 


DS 


3X 


88 


AFTIN 


DS 


H 


8A 


AFTID 


DS 


H 


8C 


AFTFCLA 


DS 


F 


90 


AFTFCLX 


DS 


H 


92 


AFTCLDX 


DS 


H 



Field Description, Contents, Meaning 
Pointer to next AFT block in chain 

Indicates that AFTPTR is in free storage 

Pointer to active disk table 

Disk address of current chain link 

Number of current chain link 

Storage address of chain link 

Disk address of current data block 

Number of current data block 

Storage address of current data block 

Chain link buffer from first chain link 



Fifth level pointer to hyperblock chain 

Fourth level pointer to hyperblock chain 

Third level pointer to hyperblock chain 

Second level pointer to hyperblock chain 

First level pointer to hyperblock chain 

Data block chain 

Item displacement in block 

Last record number processed 

Alternate READ pointer 

Alternate WRITE pointer 

A (HBLK holding static FST) 

Save data block displacement and number 

Save pointer 4 block displacement and number 

Save pointer 3 block displacement and number 

Save pointer 2 block displacement and number 

Save pointer 1 block displacement and number 

Save user buffer address 

Save user buffer length 



Length across two data blocks 

Maximum number of entries in a PTR block 
Save user buffer displacement block write 
Save real format during block write 
Save previous residual count for 

virtual format 
Current item number 
Current item displacement 
Flag byte 



Active file table block in use 

Reserved for IBM use 

First chain link in storage flag 

Full buffer assigned 

Data block in storage flag 

Active write 

Active read 

Full disk; special case 

Pointer to (static) FST entry 

Current item number 

Displacement of current item in data block 

Storage address of first chain link 

Disk address of swapped FCL 

Disk address of swapped chain link 
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AFTSECT 



Hexadecimal 


Field 






Displacement 


Name 






94 


AFTFLG2 


DS 


X 




Bits defined 


in AFTFLG2 




AFTNEW 


EQO 


X«80« 




AFTOLDCL 


EQO 


X f 40» 




AFTCLX 


EQD 


X«20» 




AFTREAD 


EQU 


XMO' 




AFT7LGTH 


EQU 


X«08' 




AFTVLREC 


EQU 


X*04« 




AFTERR8 


EQU 


X«02« 




SAMDLEN 


EQO 


X'01* 


95 




DS 


X 


96 


AFTOCLDX 


DS 


1H 


98 


AFTFST 


DS 


QD 


98 


AFTN 


DS 


ID 


AO 


AFTT 


DS 


1D 


A8 


AFTD 


DS 


1F 


AC 


AFTWP 


DS 


1H 


AE 


AFTRP 


DS 


1H 


BO 


AFTM 


DS 


1H 


B2 


AFTIC 


DS 


1H 


B4 


AFTFCL 


DS 


1H 


B6 


AFTFV 


DS 


1C 


B7 


AFTFB 


DS 


1C 



Field Description, Contents, Meaning 
A*2 Second flag byte 



Brand new file 

Current chain link existed previously 

Alternate chain link assigned and/or implied 

File is being read 

Length must be handled for virtual format 

Writing the last virtual format record 

User buffer length too long (?/short) 

Force same length update 

A*3 Reserved for IBH use 

Old value (if any) of AFTCLDX 

Filename 

Filetype 

Date and time last written 

Write pointer (ITEM=) 

Read pointer (ITEH=) 

Filemode 

Item count 

First chain link 
A*4 Fixed (F) and/or variable (V) flag byte 
A*5 Flag byte (if used) 

Bits defin ed in AFTFB 

Note: FSTB flag~*byte definitions apply only to STATEFST 

copy of FST entry after successful STATE or STATEW call. 
AFTFRWX EQO X»C0« Read-only extension of read/write disk 

AFTFRW EQO X»80» Read/write disk 

AFTFROX EQO X'40' Read-only extension of read-only disk 

AFTFRO EQO X»00» Read-only disk 

Maximum length of item 
Number of data blocks 
Year 



Alternate file origin pointer 

Alternate number of data blocks 

Alternate item count 

Number of pointer block levels 

Length of pointer element 

Alternate date and time (yymmddhhmmss) 

Reserved for IBM use 

Length of AFT block in bytes 



Forward pointer to next hyperblock in storage 
Backward pointer to previous hyperblock in storage 

Length of AFTSECT block in bytes 

Length of AFTSECT block in doublewords 



B8 


AFTIL DS 


1F 




BC 


AFDBC DS 


1H 




BE 


AFTYR DS 


1H 




CO 


FST EDF Extension 
AFTFOP~ DS~ ~1F 




C4 


AFTADBC DS 


1F 




C8 


AFTAIC DS 


1F 




CC 


AFTNLVL DS 


XL1 


A*6 


CD 


AFTPTRSZ DS 


XL1 


A*7 


CE 


AFTADATI DS 


CL6 




D4 


DS 


F 





AFTL 



EQO *-AFTN 



FST Hyper block Par amete rs 
AFTFWDP EQO 800 
AFTBKWD EQO 804 

AFTLB EQO *-AFTSECT 

AFTLD EQO AFTLB/8 



Section 2. CMS Data Areas and Control Blocks 144.1 
Licensed Material — Property of IBM © Copyright IBM Corp. 1979 



June 29, 1979 



UK.2 IBM 7M/370 Data Areas and Control Block Logic 



June 29, 1979 



ANCHSECT 



ANCHSECr: ANCHOR TABLE 

AHCHSECr defines the DOS/VS anchor table. This DSECT is used by DHSDOS when a CDLOAD 
(SVC 65) is issued, and the phase is not found in either the CHS7SAH or CHSAHS segment. 
In this case, the specified phase is loaded either from a CHS DOSLIB or a DOS core image 
library, and the name, load point, entry point, and the length in bytes, of the phase are 
saved in an available slot in the anchor table. ANCHSECT is invoked by the ANCHTAB 
macro. 





8 

10 

18 

20 



r 


AHCHENDA 


I /////////////////////////// I 




ANCHCBS 


| AHCHOAL | 


| ANCHPHNK | 




ANCHLDPT 


| ANCHENTP | 

„ i , ■ 


j A*1 


i ANCHPHLN 


i 



Hexadecimal Field 
Displacement Name 






ANCHENDA DC 


A(0) 


4 


DC 


F'0« 


8 


ANCHCBS DC 


MO) 


C 


ANCHOAL DC 


MO) 



Field Description, Contents, Meaning 



End address of anchor table 

Reserved for IBM use 

Pointer to VSAM AHCB table 

Pointer to VSAM OAL (OPEN ACB) table, which 

is followed by one or more Anchor 

Table entries 



10 
18 
1C 
20 



Anchor Table Entries and Their Forma t 
ANCHPHNM~DC CL8 T ■ ~Phase name 
ANCHLDPT DC A (0) Load point 

ANCHENTP DC A (0) Entry point 

ANCHSTSW DC X'00' A*1 Status switch 



Bits defined in ANCHSTSW 
anchmlchTeqo "" X«00« 

ANCHINST EQO X^F' 
ANCHRPJL EQO X«FF« 

ANCHLENG EQO 20 
ANCHSIZ EQO 1024 



Phase must be loaded 

Phase is already in storage 

Requested phase just loaded by another task 

(only if AP=YES) 
Length of one anchor table entry 
Default size of anchor table (in bytes) 



21 



ANCHPHLN DC 



AL3 (0) 



Length of phase in bytes 
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AVRADR 

1 AVRADR; VOLOME AND DEVICE CHARACTERISTICS 

I AYRADR details the various characteristics of both volumes and devices under its control. 






r — ■- 

| AVRPOB 


AYRVOLID 




"" "i 


8 


I I 


A*1 | A*2 


AVRVCC | 


AYRVHH 




10 


I A*3 | A*4 | 


AVRLNO 


A*5 | A*6 | 


DCTOCBC 




18 


I I 


DCTPCYL 


DCTACYL | 


DCTTCYL 




20 


| DCTBTRK 


DCTTFIX 




t 


28 


| DCTMAXR | 
i 


DCTROH 


| DCTFLG 





Hexadecimal Field 
Displacement Name 



Field Description, Contents, Meaning 



AYRPOB DS 
AYRYOLID DS 
AYRFLAG DS 



A 

CL6 

X 



Bits defined in AYRFLAG 
AVRNLNO EQO X'02 1 
AVRHYOL EQO X'01» 



AYRTYPE DS X 

Bits defined in AYRTYPE 





AYRFBA 


EQO 


1 






AYRCKD 


EQO 


2 






AYRRPS 


EQO 


3 




c 


AYRVTOC 


DS 
ORG 


0CL6 
AYRVTOC 






AYRVCI 


DS 


X 






AVRVNOM 


DS 
DS 


XL4 
X 




c 


AYRVCC 


DS 


XL2 




E 


AYRYHH 


DS 


XL2 




10 


AYRYR 


DS 


X 


A*3 


11 




DS 


X 


A* 4 


12 


AVRLNO 


DS 


XL2 




14 


DCTADR 


DS 


OX 




14 


DCTPOBC 


DS 


XL1 


A*5 


15 


DCTDTFC 


DS 


XL1 


A* 6 


16 


DCTOCBC 


DS 


XL4 




1A 


DCTPCYL 


DS 


XL2 




1C 


DCTACYL 


DS 


XL2 




1E 


DCTTCYL 


DS 


XL2 




20 


DCTBTRK 


DS 


XL4 




24 


DCTTFIX 


DS 


XL4 




28 


DCTHAXR 


DS 


XL2 





Address of POB 
Volume identifier 
A*1 Mask of invalid fields 



Logical unit number (AVRLNO) is invalid 
Volume identifier (AVRVOLID) 

and pointer to VTOC (AYRVTOC) are invalid 

A*2 Device characteristics 



FB/E device (includes FB-512) 

CKD device 

RPS is supported by device 

Pointer to VTOC 



FB/E blocks and/or CI in VTOC 
FB/E block number 
Reserved for IBM use 

Cylinder number checked 
Track number checked 
Record number checked 
Reserved for IBM use 
Logical unit number 

POB code 

DTF code 

VSAM catalog 

Primary cylinders and/or blocks per volume 

Alternate area cylinders and/or blocks 

Tracks and/or cylinders checked 

(FB/E blocks and/or access 

position by blocks and/or cylinders in group) 
Bytes per track checked (blocks 

and/or cylinder in group) 
Cylinders and/or blocks under fixed access 
Maximum physical record size 
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AVRADR 



Hexadeciial Field 

nicnlaroient Haso 



2A 
2D 



DCTROH 


DS 


XL3 


DCTFLG 


DS 


XL3 


DCTLEH 


EQD 


*-DCTADR 


A7RLEN 


EQO 


♦-AVRADR 



Vi oT fl nacrrin+inn. rnntenta Moaninn 
r , , _ — — _^;, 

Device and/or head 
Device tolerance flag bytes 

DCTADR length in bytes 

AVRADR length in bytes 
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BATLSECT, BBOX 

BATLSECT: CMS BATCH USER JOB LIMITS 

BATLSECT describes the fields in the user job limits table for CMS batch jobs. The 
ABATLIMT field in NOCOH points to BATLSECT. 



| BATCPDL | BATCPOC 



I BATPRTL j BATPRTC 



8 | BATPONL | BATPONC 

t 



Hexadecimal Field 
Displacement Name 






BATCPDL 


DC 


H«32767« 


2 


BATCPOC 


DC 


H'0» 


4 


BATPRTL 


DC 


H»32767« 


6 


BATPRTC 


DC 


H'O 1 


8 


BATPOHL 


DC 


H»32767« 


A 


BATPONC 


DC 


H'O 1 



Field Description, Contents, Meaning 



Virtual processor limit (in seconds) ; can be 

reset 
Current processor count; do not reset 
Number printed lines limit; can be reset 
Current line count ; do not reset 
Number punched cards limit; can be reset 
Current card count ; do not reset 



BBOX: BOONDARY BOX 
I BBOX contains the beginning and ending addresses of the partitions; one for each entry, 



10 



PBEGIN 



PGEND 



PFIXCNT 



PENDLOG 



PFIXLMT 



Hexadecimal Field 
Displacement Name 




4 
8 

C 
10 



PBEGINP DS 

PENDLOG DS 

PGEND DS 

PFIXLMT DS 

PFIXCNT DS 



XL4 
XL4 
XL4 
XL4 
XL 4 



Field Description, Contents, Meaning 

Starting address of partition 
Logical end of partition 
Physical end of partition 
Prefix limit is zero for CMS 
Prefix count is zero for CMS 
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BGCOH 



BGCOM: DOS/TS PARTITION COMMUNICATION REGION 



BGCOM simulates the DOS/VS Partition Communication Region (BGCOH) 
NDCON points to the BGCOM block. 



The ABGCOM field in 



10 
18 
20 
28 
30 
38 
40 
48 
50 
58 
60 
68 
70 
78 
80 
88 
90 
98 
A0 
A8 



r — 


JOBDATE 


i 


| PPBEG | 


EOSSP | 






| | UPSI \ 


! COMNAME 1 


| PPEND 


1 


HIPHAS 




| HIPROG 


1 


LABLEN | 


PIK | 


I EOCADR 


1 


A*1 | A*2 | 


A*3 | A*4 | 


I A*5 | A*6 | 


A*7 | A*8 | 


DALC | 


FOCLPT | 


j P0BPT | 


FAVPT i 


JIBPT j 


TEBPT j 


| FICLPT | 


NICLPT | 


LDBPT | 


A*9 \ A*10 t 


| MMDD 


I 


YYDDD 




| LIOCSCOM | 


PIBPT | 


CHKPTID | 


JOBZON | 


| DIBPT | 


A* 11 | //A* 12/| 


PCPTR | 


ITPTR | 


| OCPT | 


P W TI M S | //////////// 1 


LTK | 


| SYSPAR 


1 


JAPART 




| TODCOM 


1 


PIB2PTR 1 


PDTABB I 


1 ///////////////////////////I 


BGCOMPT | 


A*13 | A*14 | 


I nfxutfv 

| s~ \J LI £i JX 


1 




»*1"7 I I 
a - • » i i 




PROCNAM (cont. 


. from 8F) 


I A*18 | 




POVNAM 


I A*19 | 


1 /////////////////////////// 1 ////// 1 ///// 1 ////// 1 /////// 1 


I LDBEXT 

L 


1 


A*20 | A*21| 


A*22 | A*23 | 
_j 



Hexadecimal Field 
Displacement Name 






JOBDATE 


DC 


C« 00/00/00' 


8 


PPBEG 


DC 


SfOl 


A 


EOSSP 


DC 


S(0) 


C 




DC 


11X«00« 


17 


UPSI 


DC 


X'00' 


18 


COMNAME 


DC 


CL8» CMS/DOS' 


20 


PPEND 


DC 


4(0) 



Field Description, Contents, Meaning 

Job date 

Supervisor end 

End of storage protection 

User scratch area 

UPSI byte 

Job name 

Highest storage address of partition 
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BGCOM 



Hexadecimal 


Field 








Displacement 


Name 








24 


HIPHAS 


DC 


MO) 




28 


HIPROG 


DC 


A(0) 




2C 


LABLEN 


DC 


H»0« 




2E 


PIK 


DC 


X«0010' 




30 


EOCADR 


DC 


A(0) 




34 


CONFIG 


DC 


BM1101000 


• A*1 


35 


LTACT 


DC 


B'00010000 


' A*2 


36 


SOB1 


DC 


BM1000100 


• A*3 


37 


SOB2 


DC 


BM1011010 


• A*4 


38 


JCSW1 


DC 


BM1010000 


' A*5 


39 


JCSW2 


DC 


B'OOOOOOOO 


1 A*6 


3A 


JCSH3 


DC 


BM1000100 


' A*7 


3B 


JCSW4 


DC 


B« 10000000 


» A*8 


3C 


DALC 


DC 


H'O 1 




3E 


FOCLPT 


DC 


S(0) 




40 


PDBPT 


DC 


S(0) 




42 


FAVPT 


DC 


S(0) 




44 


JIBPT 


DC 


S(0) 




46 


TEBPT 


DC 


S(0) 




48 


FICLPT 


DC 


S(0) 




4A 


NICLPT 


DC 


S(0) 




4C 


LUBPT 


DC 


S(0) 




4E 


SYSLINE 


DC 


AL1 (56) 


a* 9 


| 4F 


SYSDATE 


DS 


OCL9 


A*10 


4F 


HMDD 


DC 


XL4«00« 




53 


YYDDD 


DC 


XL5'00« 




58 


LIOCSCOM 


DC 


2X'00» 




5A 


PIBPT 


DC 


S(0) 




5C 


CHKPTID 


DC 


H»0« 




5E 


JOBZON 


DC 


S(0) 




60 


DIBPT 


DC 


S(0) 




| 62 


DEVFLG1 


DC 


X'OO' 


A*11 


| 63 




DC 


X'OO' 


A*12 


64 


PCPTR 


DC 


S(0) 




66 


ITPTR 


DC 


S(0) 




68 


OCPT 


DC 


S(0) 




6A 


PWTIMS 


DC 


x«oooo« 




6C 




DC 


H«0« 




6E 


LTK 


DC 


S(0) 




70 


SYSPAR 


DC 


F'0» 




74 


JAPART 


DC 


F f 0» 




78 


TODCOM 


DC 


A(0) 




7C 


PIB2PTR 


DC 


S(0) 




7E 


PDTABB 


DC 


S(0) 




I 80 




DC 


F'0» 




84 


BGCOMPT 


DC 


S(0) 




i 86 


OPTNBYTE 


DC 


X'OO 1 


A*13 


I 87 


RMSROPEN 


DC 


B'OOOOOOOO 


»A*14 


88 


COMEX 


DC 


A(0) 




I 8C 


STDOPT 


DC 


B'01000000 


»A*15 


I 8D 


TEMOPT 


DC 


B'01000000 


A*16 


I 8E 


DISKCONF 


DC 


X'OO' 


A*17 


8F 


PROCNAM 


DC 


CL8» • 




I 97 


PSWTCH 


DC 


X«0« 


A*18 


98 


POVNAH 


DC 


CL7« » 




I 9F 


INSIZE 


DC 


X«0» 


A*19 


I A0 




DC 


F'0« 




I A4 




DC 


X»00« 




I A5 




DC 


X«00« 




I A6 




DC 


H*00« 




I A8 


LOBEXT 


DC 


F'00« 




I AC 


JCSW5 


DC 


X'00« 


A*20 


I AD 


JCSH6 


DC 


X'00« 


A*21 


I AE 


STDOPT2 


DC 


X*00« 


A*22 


I AF 


TEMOPT2 


DC 


X'OO' 


A*20 



Field Description, Contents, Meaning 

End address of last phase loaded 

End address of longest phase loaded 

Length of problem program label area 

Program interrupt key 

End of virtual storage address 

Machine configuration byte 

System configuration byte 

Standard language translator options 

Standard supervisor options 

Job control byte 

Linkage control byte 

Nonstandard language translator options 

Job duration indicator byte 

Disk address of volume label 

Address of FOCL 

Address of PDB 

Address of FAVP 

Address of JIB 

Address of TEB 

Address of FICL 

Address of NICL 

Address of LDB 

SYSLST line count 

System date 

MMDD or DDMM 

YYDDD portion of date 

LIOCS communication bytes 

Address of PIB 

Last checkpoint number 

Job zone in minutes 

Background DIB pointer 

Device flags for ADTOCLOSE 

Reserved for IBM use 

PC option table 

IT option table 

OC option table 

Key of program with IT support 

Reserved for IBM use 

Logical transient key 

Address of SYSPARM 

Address of job accounting table 

Address of TOD communications area 

Address of PIB extension 

Address of MICR DTF table 

Reserved for IBM use 

Address of background COMREG 

Option indicator byte 

System configuration byte 2 

Pointer to SYSCOM option table 

Standard job control option byte 

Temporary job control option byte 

Disk configuration byte 

Procedure name 

Interface byte for catalog procedure 

Save area for statement name 

81-byte SYSIN indicator 

Reserved for IBM use 

Reserved for IBM use 

Reserved for IBM use 

Reserved for IBM use 

Address for LOBTAB extension 

Job control switch 5 

Job control switch 6 

Standard options 2 

Temporary options 2 
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DBGSECT 



Hexadecimal Field 

DXspJ.dCSS€ui. naSc 



Field Description- Contents. Meanina 



288 
298 
2A0 
2A1 
2AC 
303 
304 
324 
325 



328 
328 
330 
334 
337 

338 
33A 
33C 
340 
348 
34C 
350 
358 
359 

361 
36F 
379 



TSTM 

XPSff 

O0TPT1 

LINE 

LIHE1 

LIHE1B 

LINE1A 

LINE1C 

LINE1D 

DBGOUT 

INPUT 

IHP0T1 

CONIR 



CONHRL 



CONHCT 
HEX 

HEXHEX 

BITS 



DS 
DS 
DC 
DC 
DC 
DC 
DC 
DC 
DC 

EQU 
EQO 
EQU 

DS 
DC 
DC 
DC 
DC 



INPUTSIZ DS 
DS 
DC 
DC 
DS 
DC 
DS 
DC 
DC 

ORG 

DC 

DC 



4F 

■«T\ 
I U 

1C • 

CL11 1 ■ 

87X«40« 

C«*« 

32X*40» 

C**» 

X'40' 

LINE 
LINE 
LINE+60 



A* 2 



A*3 

A*4 
A*5 



Symbol entry 
Execution PSW 
Byte count 
I/O buffer 
Filler bytes 
Filler bytes 
Filler bytes 
Filler bytes 
Filler bytes 

Output buffer 
Input buffer 
Hexadecimal pack area 



0D PLIST for DMSCHR to type output line 

CLS'TYPLIN* PLIST continued 

AL1 (1) ,AL3(DBS0UT) PLIST continued 
CL1»B«,AL2(0) PLIST continued 
AL1 (0) A*6 PLIST continued 



Size of typed-in input line 
Reserved for IBM use 



1H 

1H 

F»0» 

X'FAFBFCFDFEFFOOOO' Translate table 

1F Binary word 

X'FFFFFFFF' Fence 

2F Printer graphic word 

X'FF' Extra translate byte 

X'COCOCOCOCOCOCOCO 1 Scratch word 



♦#■14 

C'0123456789' 

C'ABCDEF* 



Translate table 
Translate table 
Translate table 



CONHXT 



EQU 



CONHCT-C'A' 



37F 



380 
388 
38C 
38E 
390 
391 
392 
393 



394 
39A 



DBGSHTCH DC 



X»00 f 



gits defined in DBGSWTCE 
X'80' 



DBDEXIT 

DBDDMSG 

DBGSET 

DBGPERH 

DBGCOND 



EQU 
EQU 
EQU 
EQU 
EQU 



X«40« 
X*20* 
I'10« 
X«08' 
X«04« 
X'02» 



A*7 Internal DEBUG status flags 



Reserved for IBM use 

Reserved for IBM use 

Exit from DEBDUMP 

Duplicate message in DEBDUMP 

SET command 

Reserved for IBM use 

Reserved for IBM use 



%&& Following are Reserved fo r IBM Use 



YPSW 

TBLINDX 

BCR 

ILC 
ILC11 
ILC0110 
ILC00 

BAL 
BALR 

DBGXHK 



DS 

DS 

NOPR 

NOPR 

DS 

DC 

DC 

DC 

EQU 
EQU 

DS 



D 

F 





1C 

X«06« 

X»04 f 

X'02» 

X«45« 

x'os 1 

3H 



LPSW 48 



PSW containing NSI 

Current BRKPT table index 

NOPR to pad DBGXHK when needed 

Additional NOPR (if needed) 
A*8 ILC of instruction in DBGXHK 
A*9 3 halfword instructions (6 bytes) 
A* 10 2 halfword instructions (4 bytes) 
A* 11 1 halfword instructions (2 bytes) 

BAL operation code 
BALR operation code 

Re-create instruction at BRKPT address 

Give control to NSI 
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DCHSECT 



| DCHSECT: DATA CONTROL HYPER BLOCK 



DCHSECT is the data control hyperblock that is an in-storage representation of disk data 
blocks as well as the interrelationship of these blocks on the disk. 



8 
10 
20 
20 
28 



j DCHFWPTR 


i 

DCHBWPTR i 


| DCHDWSIZ 


DCHTRDNK | 


| DCHTDISP 


DCHDTSIZ | 


| DCHSEQBD 


D*1 


| D*2 


|//D*3//|//D*4//| 


| DCHDAMAP 


DCHCHMAP | 


I////////////////////////DCHRSV/////////////////////////I 

L _ _ _ _ _J 



Hexadecimal Field 
Displacement Name 




4 
8 
C 
10 


DCHFHPTR DS 
DCHBWPTR DS 
DCHDWSIZ DS 
DCHTRDNK DS 
DCHTDISP DS 


A 
A 
F 
F 
A 


14 
18 
1C 


DCHDTSIZ DS 
DCHSEQBD DS 
DCHFLG1 DS 


F 
F 
XL1 



1D 



1E 
1F 
2C 
24 
28 



Bits defin ed in DCHFLG 1 
DCHCHOP EQD X»80»~ 

DCHNEW EQD X'40 1 

DCHDALLO EQD X'20 1 

DCHCHGD EQD X'10» 

DCHFLG2 DS XL1 

Bits defined in DCHFLG2 
DCHFDLL EQD X'80» 

DCHDA EQD X^O 1 

DCHLHBLK EQD X^O 1 



DCHFLG3 DS XL1 

DCHFLG4 DS XL1 

DCHDAMAP DS F 

DCHCHMAP DS F 

DCHRSV DS 2F 

DCHPFIXL EQD *-DCHSECT 



Field Description, Contents, Meaning 

Forward pointer 

Backward pointer 

Full hyperblock storage size in doublewords 

Address of next block up in structure 

Displacement to disk address in 

root pointer block 
Data portion size in bytes 
Displacement of seguential data block 
D*1 First flag byte 



De-allocate this directory block 
during directory update 

Do not reallocate this directory 
block during directory update 

Disk address of block is in 
de-allocation list 

Block has been altered 

D*2 Second flag byte 



All disk blocks allocated in 

this hyperblock 
All disk blocks de-allocated 

by erase 
Last hyperblock in buffer changed 

for erase 

D*3 Reserve area for third flag byte 
D*4 Reserve area for fourth flag byte 

De-allocation map address 

Change map address 

Reserved for IBM use 

Length of prefix portion of hyperblock 
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DEVSECT 



DEVSECT: DEVICE TABLE DSECT 



DEVSECT describes the device information required for input/output routines, 
a DSECT corresponding to the data in a DEVTAB entry. 



DEYSECT is 



DE7ADDR 



| D*1 | D*2 | 



DEVHAME 



8 I 



DEVIPRA 



DEVMISC 



Hexadecimal Field 
Displacement Name 



Field Description, Contents, Meaning 



DEYADDR DS 
DEYFLAG DS 



1H 
1X 



Bits defined in DEVFLAG 

DEVHAIT ~EQO X T 80»~ 

DEVCLAS EQU DEYFLAG 

DEYFBA EQO X'7F' 

DEYDASD EQO X'02» 

DEVTYPE DS 1X 

DEYNAHE DS 1F 

DEYIPRA DS IF 

DEVMISC DS 1F 

DEVSIZE EQO *-DEYSECT 



Virtual device address 
D*1 Device flags 



Wait bit 

Device class 

FB-512 unit 

Direct access storage device 

D*2 Device type 

Symbolic device name 

Interrupt processing routine address 

Miscellaneous — device dependent 

Device table size (in bytes) 
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nvirmi » 

DEVTAB: DEVICE TABLE 

DE¥TAB contains the entries for the various devices handled by CMS (disks, tapes, reader, 
punch, printer, and console) . DEVTAB is pointed to by V-constants in DMSIOW and DHSITI, 
and is also referenced indirectly by the ADEVTAB field in NUCON. 






i 

| CONSOLE 


i 


10 


| ADISK | 


20 


BDISK | 


30 


CDISK |" 


40 


DDISK | 


50 


EDISK ! 


60 


FDISK | 


70 


GDISK | 


80 


HDISK | 


90 


IDISK | 


A0 


JDISK | 


B0 


KDISK \ 


CO 


LDISK | 


DO 


MDISK | 


E0 


NDISK | 


F0 


ODISK | 


100 


PDISK | 


1101 


QDISK | 


120! 
i 


RDISK 


—j 



130 


i 

I SDISK 


i 


mo 


I TDISK | 


150 


I UDI5K | 


160 


VDISK | 


170 


WDISK | 


180 


XDISK | 


190 


YDISK | 


1A0 


ZDISK | 


1B0 


READER1 | 


1C0 


PUNCH 1 | 


1D0 


PRINTER 1 | 


1E0 


READER2 | 


1F0 


PUNCH2 | 


200 


PRIHTER2 | 


2101 


TAPE1 | 


220! 


TAPE2 | 


2301 


TAPE3 | 


240| 


TAPE4 | 


2501 
i 


DUMMY 


i 
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Hexadeciial 


Field 






Displacement 


Haae 









CONSOLE 


DS 


0D 







DC 


XL2«009« 


2 




DC 


XL2«0» 


4 




DC 


CL4»C0N1 1 


8 




DC 


VL4 (COHSI) 


C 




DC 


XL4«0* 


10 


ADISK 


DS 


OD 


10 




DC 


XL2M91" 


12 




DC 


XL2«0» 


14 




DC 


CL4'DSKl f 


18 




DC 


AL4 (0) 


1C 




DC 


XL4»0« 


20 


BDISK 


DS 


OD 


20 




DC 


XL2'OO0 f 


22 




DC 


XL2«0» 


24 




DC 


CL4«DSK2' 


28 




DC 


AL4 (0) 


2C 




DC 


XL4«0« 


30 


CDISK 


DS 


OD 


30 




DC 


XL2'000» 


32 




DC 


XL2»0» 


34 




DC 


CL4 , DSK3» 


38 




DC 


AL4 (0) 


3C 




DC 


XL4»0« 


40 


DDISK 


DS 


OD 


40 




DC 


XL2M92* 


42 




DC 


XL2'0» 


44 




DC 


CL4'DSK4» 


48 




DC 


AL4 (0) 


4C 




DC 


XL4«0' 


50 


EDISK 


DS 


OD 


50 




DC 


XL2»000» 


52 




DC 


XL2«0« 


54 




DC 


CL4»DSK5» 


58 




DC 


&L4 (0) 


5C 




DC 


XL4«0« 


60 


FDISK 


DS 


OD 


60 




DC 


XL2»000' 


62 




DC 


XL2»0» 


64 




DC 


CL4»DSK6» 


68 




DC 


AL4 (0) 


6C 




DC 


XL4«0« 


70 


GDISK 


DS 


OD 


70 




DC 


XL2«000« 


72 




DC 


XL2«0' 


74 




DC 


CL4 , DSK7' 


78 




DC 


AL4(0) 


7C 




DC 


XL4'0« 


I 80 


HDISK 


DS 


OD 


I 80 




DC 


XL2»000« 


I 82 




DC 


XL2 , 0« 


I 84 




DC 


CL4«DSKH» 


I 88 




DC 


AL4 (0) 


I 8C 




DC 


XL4«0» 


I 90 


IDISK 


DS 


OD 


I 90 




DC 


XL2«000 f 


I 92 




DC 


XL2«0» 


I 94 




DC 


CL4«DSKI» 


I 98 




DC 


&L4 (0) 


I 9C 




DC 


XL4«0» 



Field Description, Contents, Heaning 
Device table entry for console 



Device table entry for A-disk 



Device table entry for B-disk 



Device table entry for C-disk 



Device table entry for D-disk 



Device table entry for E-disk 



Device table entry for F-disk 



Device table entry for G-disk 



Device table entry for H-disk 



Device table entry for I-disk 
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DE7TAB 



Hexadecimal 


Field 






Displacement 


Haie 






I AO 


JDISK 


DS 


OD 


I AO 




DC 


XL2'000* 


I A2 




DC 


XL2«0« 


i A4 




DC 


CL4«DSKJ« 


I A8 




DC 


AL4 (0) 


| AC 




DC 


XL4»0« 


I BO 


KDISK 


DS 


OD 


I BO 




DC 


XL2 , 000« 


I B2 




DC 


XL2«0« 


\ B4 




DC 


CL4 , DSKK* 


| B8 




DC 


AL4 (0) 


I BC 




DC 


XL4«0» 


I CO 


LDISK 


DS 


OD 


| CO 




DC 


XL2'000« 


■ fi 




T\r> 


rnini 


| l*.£ 




IV v^ 


AilA V 


J C4 




DC 


CL4«DSKL' 


| C8 




DC 


AL4 (0) 


| CC 




DC 


XL4«0« 


| DO 


HDISK 


DS 


OD 


| DO 




DC 


XL2«000» 


| D2 




DC 


XL2'0« 


| D4 




DC 


CL4«DSKM« 


| D8 




DC 


AL4 (0) 


| DC 




DC 


XL4'0« 


| EO 


NDISK 


DS 


OD 


| EO 




DC 


XL2«000* 


( E2 




DC 


XL2*0* 


| E4 




DC 


CL4«DSKH I 


| E8 




DC 


AL4 (0) 


| EC 




DC 


XL4«0« 


I FO 


ODISK 


DS 


OD 


| FO 




DC 


XL2»000» 


| F2 




DC 


XL2'0« 


| F4 




DC 


CL4 , DSKO« 


| F8 




DC 


AL4 (0) 


1 FC 




DC 


XL4'0' 


| 100 


PDISK 


DS 


OD 


| 100 




DC 


XL2»000« 


| 102 




DC 


XL2«0' 


I 104 




DC 


CL4»DSKP« 


j 108 




DC 


AL4 (0) 


I 10C 




DC 


XL4«0« 


I 110 


QDISK 


DS 


OD 


I 110 




DC 


XL2«000« 


| 112 




DC 


XL2'0» 


I 114 




DC 


CL4 , DSKQ I 


| 118 




DC 


AL4 (0) 


I 11C 




DC 


XL4«0« 


| 120 


RDISK 


DS 


OD 


I 120 




DC 


XL2'000' 


| 122 




DC 


XL2»0» 


I 124 




DC 


CL4«DSKR« 


I 128 




DC 


AL4 (0) 


| 12C 




DC 


XL4'0« 


| 130 


SDISK 


DS 


OD 


I 130 




DC 


XL2'190« 


I 132 




DC 


XL2«0* 


| 134 




DC 


CL4«DSK8» 


I 138 




DC 


AL4 (0) 


I 13C 




DC 


XL4'0» 



Field Description, Contents, Meaning 
Device table entry for J-disk 



Device table entry for K-disk 



Device table entry for L-disk 



Device table entry for M-disk 



Device table entry for N-disk 



Device table entry for O-disk 



Device table entry for P-disk 



Device table entry for Q-disk 



Device table entry for R-disk 



Device table entry for S-disk 
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Hexadecimal 


Field 






Displacement 


Name 






I no 


TDISK 


DS 


OD 


I 140 




DC 


XL2 , 000» 


I 142 




DC 


XL2»0« 


I 144 




DC 


CL4 , DSKT» 


I 148 




DC 


AL4 (0) 


i 14C 




DC 


XL4 •0' 


I 150 


ODISK 


DS 


OD 


I 150 




DC 


XL2«000» 


I 152 




DC 


XL2'0» 


I 154 




DC 


CL4 , DSKU' 


| 158 




DC 


AL4 (0) 


| 15C 




DC 


XL4 f 0« 


| 160 


YDISK 


DS 


OD 


| 160 




DC 


XL2«000» 


| 162 




DC 


XL2'0' 


I 164 




DC 


CL4»DSKV* 


I 168 




DC 


AL4 (0) 


| 16C 




DC 


XL4«0« 


I 170 


WDISK 


DS 


OD 


I 170 




DC 


XL2»000« 


| 172 




DC 


XL2»0* 


I 174 




DC 


CL4»DSKW« 


I 178 




DC 


AL4 (0) 


I 17C 




DC 


XL4«0' 


I 180 


XDISK 


DS 


OD 


| 180 




DC 


XL2»000» 


I 182 




DC 


XL2»0' 


I 184 




DC 


CL4«DSKX» 


I 188 




DC 


AL4 (0) 


I 18C 




DC 


XL4»0« 


I 190 


YDISK 


DS 


OD 


I 190 




DC 


XL2M9E 1 


I 192 




DC 


XL2'0« 


I 194 




DC 


CL4«DSK9» 


I 198 




DC 


AL4 (0) 


I 19C 




DC 


XL4'0« 


I 1A0 


ZDISK 


DS 


OD 


I 1A0 




DC 


XL2»000» 


I 1A2 




DC 


XL2«0» 


I 1A4 




DC 


CL4«DSK0» 


I 1A8 




DC 


AL4 (0) 


I 1AC 




DC 


XL4'0« 


I 1B0 


READER 1 


DS 


OD 


I 1B0 




DC 


XL2 , 00C» 


I 1B2 




DC 


XL2»0« 


I 1B4 




DC 


CL4 , RDR1» 


I 1B8 




DC 


AL4 (0) 


I 1BC 




DC 


XL4»0» 


I 1C0 


P0NCH1 


DS 


OD 


I 1C0 




DC 


XL2 , 00D» 


I 1C2 




DC 


XL2«0« 


I 1C4 




DC 


CL4'PCH1» 


I 1C8 




DC 


AL4 (0) 


I 1CC 




DC 


XL4»0« 


I 1D0 


PRINTER 1 


DS 


OD 


I 1D0 




DC 


XL2«00E» 


I 1D2 




DC 


XL2«0« 


I 1D4 




DC 


CL4»PRN1' 


J 1D8 




DC 


AL4(0) 


I 1DC 




DC 


XL4»0' 



Field Description, Contents, Meaning 
Device table entry for T-disk 



Device table entry for D-disk 



Device table entry for V-disk 



Device table entry for W-disk 



Device table entry for X-disk 



Device table entry for Y-disk 



Device table entry for Z-disk 



Device table entry for READER1 



Device table entry for P0NCH1 



Device table entry for PRINTER1 
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DEVTAB 



Hexadecimal Field 



T\-i anl </>aaan4 



J 1E0 


READER2 


DS 


OD 


| 1E0 




DC 


XL2«012« 


> mo 




r»r» 


vt tini 


| IJCi£ 




UK, 


&.1A*. - v - 


| 1E4 




DC 


CL4 , RDR2» 


| 1E8 




DC 


AL4 (0) 


| 1EC 




DC 


XL4*0« 


| 1F0 


P0NCH2 


DS 


OD 


| 1F0 




DC 


XL2«013' 


I 1F2 




DC 


XL2«0» 


| 1F4 




DC 


CL4«PCH2* 


| 1F8 




DC 


AL4 (0) 


| 1FC 




DC 


XL4«0« 


| 200 


PRINTER2 


DS 


OD 


| 200 




DC 


XL2«010» 


| 202 




DC 


XL2«0« 


| 204 




DC 


CL4 , PRN2 I 


| 208 




DC 


AL4 (0) 


| 20C 




DC 


XL4'0« 


| 210 


TAPE1 


DS 


OD 


| 210 




DC 


XL2M81* 


| 212 




DC 


XL2»0« 


| 214 




DC 


CL4«TAP1* 


| 218 




DC 


AL4 (0) 


| 21C 




DC 


XL4»0« 


| 220 


TAPE2 


DS 


OD 


I 220 




DC 


XL2M82* 


| 222 




DC 


XL2«0 f 


| 224 




DC 


CL4«TAP2» 


| 228 




DC 


AL4 (0) 


| 22C 




DC 


XL4«0' 


I 230 


TAPE3 


DS 


OD 


I 230 




DC 


XL2M83* 


| 232 




DC 


XL2»0« 


| 234 




DC 


CL4«TAP3 f 


| 238 




DC 


AL4 (0) 


I 23C 




DC 


XL4«0' 


| 240 


TAPE4 


DS 


OD 


I 240 




DC 


XL2M84' 


| 242 




DC 


XL2»0« 


i 244 




DC 


CL4 ! TAP4 S 


| 248 




DC 


AL4 (0) 


| 24C 




DC 


XL4'0 f 


I 250 


DUMMY 


DS 


OD 


I 250 




DC 


XL2»000« 


I 252 




DC 


XL2'0' 


I 254 




DC 


CL4 , XXXX» 


I 258 




DC 


AL4 (0) 


I 25C 




DC 


XL4«0« 


I 260 


TABEND 


DS 


OD 



Tiol^ naerrintinn. fnntontc Moaninn 



Device table entry for READER2 



Device table entry for PDNCH2 



Device table entry for PRINTER2 



Device table entry for TAPE1 



Device table entry for TAPE2 



Device table entry for TAPE3 



Device table entry for TAPE4 



Device table entry for DUMMY 
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DIOSECT 

DIOSECT: DISK 1^0 WORK AREA 

DIOSECT describes the fields used by DMSDIO as a work area when reading and writing 
actual blocks of data on CMS disks. DIOSECT is pointed to by a V-constant in DHSNOC, and 
referenced indirectly by ADIOSECT in NDCOH. 



r 




IOOLD 




i 


| DIOCSH | 






PWAIT 








i 
1 


QQDSK1 




I CCH1 | 


I CCW1A | 


I CCW2 | 


| CCW3 | 


| RHCCR | 




SEEKADR 




1 A*1 | 


I FBACCWD1 | 


| FBACCWL1 | 


| FBACCWX1 | 


I A*2 


I //////RESER¥ED///////| 


FBACD1M0 






FBACD1FB 


1 


FBACD1LB 




I A*3 


I A*4 1 FBACL1NB 


1 


FBACL1B0 






LASTCYL 


1 


LASTHED 




I A*5 


| A*6 | 


SENSB 














i 

1 






I SENCCW | 


I DOUBLE | 






XRSAVE 








r 
1 




I A*7 | 




FREERO 


1 


DIOFREE 




| SAVEADT | | 






ccwx 




f 


| A*8 


I A*9 | A*10 | 











8 

10 

20 
28 
30 
38 
40 
48 
50 
58 
60 
68 
70 
78 
80 
88 
90 

A8 
B0 
B8 
CO 

F8 

100 

108 

110 

118 

i 1 
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DIOSECT 



Hexadecimal 



Field 
Naae 



DIOSECT DSECT 
IOOLD DC ID'O* 
r>Tnr<:H nr* mtfl* 



Field Description- Contents. Heanina 



I/O old PSW (froa interrupt routine) 



10 
10 
18 
1C 
20 
24 



28 
30 
38 
40 
48 

50 

57 



58 
60 
68 



70 
71 
74 
78 
7C 



80 
81 
82 
84 



88 
8C 

90 

91 



92 
1C 
B0 



B8 



PLIST To Call DMSIOW 

DS OF 
PWAIT DC 

DC 

DC 

DC 

DC 



QQDSK1 
QQDSK2 



CL8»WAIT» 

C*DSK-« 

F«0« 

F*0» 

F»0' 



EQD QQDSK1+2 



Filled in to correct symbolic disk number 

First two bytes are always 

Half word copy of 16th track disk address 



CCW Cnam 

CCW1 CCW 

CCW1A CCW 

CCW2 CCW 

CCW3 CCW 

RWCCW CCW 

SEEKADR DC 

SECTN0M DC 



X«07«,SEEKADR,X«40*,6 Seek 

X , 03 , ,0 # X«40 , # 1 Seek or set sector 

X«31«,SEEKADR+2 # X I 40 , ,5 Search 

X«08*,*-8,0, 1 TIC back to search 

X , 00 , ,*-*,X , 20«,*-* Read or write data 

XL7'00' Seek/search information (first 3 bytes are 0} 

X«00» A*1 Sector number 



FBACCWL1 CCW 
FBACCWX1 CCW 



15-51.2 CCWs for Ose in One-CHS- Bloc k Operations 

FBACCWD1 CCW FBADEF,FBACD1, SILI+CC, 16 Define extent of full minidisk 

FBALOC,FBACL1,SILI*CC,8 Locate FB-512 block for next operatic! 

FBARD,) ,SILI,512 Read a number of FB-512 blocks 



A*2 Mask byte 

Reserved for IBM use 
Major displacement 
Displacement of first block 
Displacement of last block 



Extent List 
FBACD1 DC 


X«00» 


DC 


X'OOOOOO' 


FBACD1MO DC 


F'O 1 


FBACD1FB DC 


F'O' 


FBACD1LB DC 


F'2« 


Locate List 
FBACL1 DC 


X'OO 1 


DC 


X'OO* 


FBACL1NB DC 


H«1' 


FBACL1BO DC 


F«2« 



I/O Information 
LASTCYL DC F'O 1 
LASTHED DC F»0» 



DE7TYP DC 
DIOFLAG DC 



X»00« 
X«00« 



Bits defined in DIO FL AG 
TOOBIG EQ0 ~ X , 04« 
WRTKF EQO X , 02 l 
QQTRK EQO X'01' 



DIAGNOM EQO 

SEHSB DC 
DS 
SENCCW CCW 



24 



A*3 Operation 

A*4 Auxiliary byte 

Number of blocks 
Block displacement 



Becomes last cylinder number used 
Becomes last head number used 

A*5 01=2311, 08=2314, 09=3330 

A*6 RDTK/WRTK flag: 

Byte count is greater than 800 
Writing first chain link 
Handling first chain link 

Number assigned by CP for DIAGNOSE I/O 

Sense information 



XL24»00» 

OF 

X , 04»,SENSB,X , 20«,24 s e 4 d 24 BYTES SILI 



Miscellaneous Sto r age 
DOUBLE DC 1D 7 0» 



(Scratch area, for CVD use, etc.) 
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DIOSECT 

Hexadecinal Field 

Displacement Name Field Description, Contents, Meaning 



Keep the Following Three in Order 
CO XRSA7E DS 15F Registers 0-14 saved here for RDTK/WRTK 

FC DC AL3 (0) First 3 bytes of R15 error code 

FF ERRCODE DC AL1 (*-*) A*7 Error code (in R15 at exit) 

E§e£ the Followi ng Two in Order 
100 FREERO DC F»0* Ho. of doublewords of free storage (if any) 

104 DIOFREE DC F'O* Address of free storage for buffer or CCHs 

108 SAVEADT DC F«0» Handy place for an ADT address 

110 CCWX CCW X^'jSECTNOMjX'^O^I Set sector 

118 DIAGRET DC X»00» A*8 CP»s DIAGNOSE return code if nonzero 

119 IOCOMM DC X^O* A*9 Set to read (06) or write (05) 

11A LASTREC DC X'00' A*10 Huiber (1-14) of the last record processed 
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DIRSECT 

I DIRSEC T; CHS PDS DIRECTORY ENTRY 

| DIRSECT describes the fields of a CHS PDS directory entry. DIRSECT is invoked by the LIB 
I lacro. 



DIRHEHB 



8 | DIRITEHX | D*1 | D*2 | DIRITEH 

i ', 



Hexadecimal Field 
Displacement Nane 





DIRHEHB DS 


«»1T O 
OJUO 


8 


DIRITEHX DS 


1H 


A 


DIRFLG1 DS 


1X 


B 


DIRFLG2 DS 


1X 



Bits defined in DIRFLG2 
DIRNA EQO X'80« 



DIRITEH DS 
DIRENTSZ EQO 



1F 
*-DIRSECT 



Field Description, Contents, Heaning 

aciucl HaSc 

SCP two-byte start item naaber 
D*1 First flag byte 
D*2 Second flag byte 



Not an alias 

Starting itei nuaber of member 

Length of directory entry 
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DMSCCB 

DMSCCB: COMMAND CONTROL BLOCK 

DMSCCB describes all fields of a DOS Comnand Control Block (CCB) . This DSECT is used by 
DMSXCP to map the CCB specified by a user for an SVC (EXCP) and passes the address of 
CCB to DMSXCP. 




8 
10 
18 
20 
28 
30 
38 



CCBCNT 



I A*1 | A*2 | A*3 | A*4 I A*5 | A*6 



A*7 | CCBCCW 



| A*8 | CCBCSH 



CCBLDATB 



CCBLCCWB 



///////////////////////////I a*9 I CCBFSCCW 



CCBRDCCW 



CCBHTCCW 



CCBLWCCW 



I /////////////////////////// 



/////////////////////////// I /////////////////////////// 



CCBNCCB 



I /////////////////////////// 



Hexadecimal Field 
Displacement Name 





CCBST 


EQO 


* 




CCBD 


EQO 


* 





CCBLEN 


DS 


0CL16 





CCBCNT 


DS 


XL2 


2 


CCBERHAP 


DS 


0XL4 


2 


CCBCOM1 


DS 


XL1 




Bits defined 
CCBWAIT EQO 


in CCBC0M1 
X T 80» 




CCBEOF 


EQO 


X'»K)' 




CCBIOERR 


EQO 


X'20 1 




CCBERROK 


EQO 


X'10» 




CCBRDC 


EQO 


X f 08' 




CCBPDE 


EQO 


X»04» 




CCBDC? 


EQO 


X«02» 




CCBOERR 


EQO 


X»01» 


3 


CCBCOM2 


DS 


XL1 




Bits defined 


in CCBCOM2 




CCBDCCNT 


EQO 


X«80» 




CCBTRK07 


EQO 


X'40» 




CCBEOC 


EQO 


X^O* 




CCBDC 


EQO 


X'10« 




CCBNOREC 


EQO 


X«08« 




CCBRETRY 


EQO 


X«04« 




CCB?ER 


EQO 


X'02» 




CCBCC 


EQO 


X«01» 



Field Description, Contents, Meaning 

Start CCB 

Command control block 

Map of the DOS CCB 
Residual count 

Four bytes used to check errors 
A*1 Communications byte 1 



Traffic bit (set at CE) 
End of file 

Onrecoverable I/O error 
Accept unrecoverable error 
Return data checks 
Post at device end 
Return data check RD/CHK 
Oser error routine 

A*2 Communications byte 2 



Data check in count area 

Track overrun 

End of cylinder 

Data check 

No record found 

Retry no record found 

Verify error 

Command chain (retry) 
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Hexadecimal Field 
Displacement Name 



CCBCSW1 DS 



XL1 



Field Description. Contents. Meaning 
A*3 CSW status bit 1 



D 
10 
14 
18 
1C 



Bits def: 


Lned 


in CCBCSWl 
X»80« 




CCBATTN 


EQU 




CCBSTHOD 


EQD 


X f 40» 




CCBCOE 


EQU 


X«20* 




CCBBDSI 


EQO 


XM0« 




CCBCE 


EQO 


X»08« 




CCBDE 


EQO 


X*04« 




CCBOC 


EQO 


X*02» 




CCBOE 


EQO 


X»01« 




CCBCSW2 


DS 


XL1 


A*4 


Bits defined 


in CCBCSW2 
X*80» 




CCBPCI 


EQO 




CCBILEN 


EQO 


X'40» 




CCBPROGM 


EQO 


X«20« 




CCBPROT 


EQO 


X«10« 




CCBCHAND 


EQO 


X'08 1 




CCBCHANC 


EQO 


X«04« 




CCBICTRL 


EQO 


X«02 f 




CCBCHAIN 


EQO 


X»01» 




CCBSYMO 


DS 


0XL2 




CCBSDCLS 


DS 


XL1 


A*5 


CCBSONOM 


DS 


XL1 


A*6 


CCBLIOBS 


DS 


XL1 


A*7 


CCBCCW 


DS 


XL3 




CCBC0M3 


DS 


XL1 


A*8 


CCBAPEND 


EQO 


X*40* 




CCBCSW 


DS 


XL3 




CCBLDATB 


DS 


A 




CCBLCCWB 


DS 


A 






DS 


F 




CCBDFLGS 


DS 


X 


A*9 



Bits defi ned in CCBOFLGS 
CCBOEAIC EQO X'80 1 
CCBOEAC EQO X'UO 1 
CCBORDCII EQO X'20 1 
CCBRPS EQO X'10« 



1D 


CCBFSCCW 


DS 


XL3 


20 


CCBRDCCW 


DS 


F 


24 


CCBWTCCW 


DS 


F 


28 


CCBLWCCW 


DS 


F 


2C 




DS 


3F 



Attention 
Status modifier 
Control unit end 
Busy 

Channel end 
Device end 
Onit check 
Onit exception 

CSW status bit 2 



Program-controlled interrupt 
Incorrect length 
Program check 
Protection check 
Channel data check 
Channel control check 
Interface control check 
Chaining check 

Symbolic unit (SYSON) 

- LOB class 

N - LOB number within class 

Reserved for LIOBS 

Pointer to start of channel program 

Communication byte 3 

Appendage exit at interrupt 

Pointer to CSW or to appendage routine 
Address of last data block 
Address of last CCW block 
Reserved for IBM use 
I/O manager CCB flags 



Error analysis in control 
Error analysis complete 
Read CCW active 
RPS channel program candidate 

Save area for first CCW address 
Address of first read CCW 
Address of first write CCW 
Address of the last write CCW 
Reserved for IBM use 



38 
3C 



Note: CCBLWCCW chain field must have the same displacement as does FCBCHAIN 
in FCDB and also BKPFSTBK in BKPRD 



CCBNCCB 



DS 
DS 



Address of next CCB block 
Reserved for IBM use 
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DOSSECT: DOS SIMULATION CONTROL BLOCK 

DOSSECT simulates the CHS File Control Block (FCB) in the CHS/DOS environment, 
is invoked by the DOSCB macro. 



DOSSECT 



The DOS Simulation Control Blocks are chained together. The DOSFIRST field in HOCOH 
points to the first DOSCB in the chain, or if no chain exists, contains zero. 



8 
10 
18 
20 
28 
30 
38 
40 
48 
50 
58 
60 
68 
70 



| DOSNEXT 


I 


DOSCBID 


| DOSDD 


| DOSOP 


| DOSDSNAM 


| DOSDSTYP 


| DOSDSHD I /////////////I 


DOSBOFF 


| DOSBYTE 


I D*1 


I D*2 I///////////// 


| DOSREAD 


I 


DOSITEH 


| DOSCOOT 


I D*3 


| D*4 | DOSBLKSZ 


| DOSWORK 


| D*5 | D*6 | D*7 


| D*8 j 


DOSOSFST 


| DOSOSDSN 


I 


DOSVOLTB 


| DOSEXTTB 


| DOSSENSE | D*9 | D*10 


I DOSBDFSP 


I 


DOSDCNAH 


I D0S0CNAM (cont.) 


I 

„,.„_ _, i 






DOSSAVE 





80 



, 1 

I D*11 I D*12 i ///////////// i 
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Field Description, Contents, Meaning 
DOSCB flag byte 



Hexadecimal 


Field 








Displacement 


Name 











DOSINIT 


DS 


OX 






Bits defined 


in DOSINIT 
X»40« 






DOSOS 


EQO 






DOSDOS 


EQO 


X«20« 






DOSCMS 


EQO 


X'10« 






DOSDDCAT 


EQO 


X«08» 






DOSPERM 


EQO 


X , 04» 






DOSJCAT 


EQO 


X'02' 






DOSOCAT 


EQO 


X«01» 







DOSNEXT 


DS 


A 




4 


DOSCBID 


DS 


CL4 




8 


DOSDD 


DS 


CL8 








DS 


s%t a 
UJL.O 




18 


DOSTAPID 


DS 


OX 




18 


DOSDSNAM 


DS 


CL8 




20 


DOSDSTYP 


DS 


CL8 




28 


DOSDSMD 


DS 


CL2 




2A 




DS 


H 




2C 


DOSBOFF 


DS 


F 




30 


DOSBYTE 


DS 


F 




34 


DOSFORM 


DS 


CL1 


D*1 


35 


DOSEPL 


DS 


1X 


D*2 


36 




DS 


1H 




38 


DOSREAD 


DS 


F 




3C 


DOSITEM 


DS 


1F 




40 


DOSCOOT 


DS 


1F 




44 


DOSDEV 


DS 


X 


D*3 



Bits defined in DOSDEV 
DOSDOM EQO 0~ 
DOSDSK EQO 20 



I 45 


DOSTAPMD 


DS 


X 


D*4 


I 46 


DOSBLKSZ 


DS 


H 




| 48 


DOSWORK 


DS 


D 




| 50 


DOSYSXXX 


DS 


OH 




I 50 


DOSSYS 


DS 


1X 


D*5 


I 51 


DOSXXX 


DS 


1X 


D*6 


I 52 


DOSEXT 


DS 


1X 


D*7 


I 53 


DOSEXTCT 


DS 


1X 


D*8 


I 54 


DOSOSFST 


DS 


F 




I 58 


DOSOSDSN 


DS 


F 




I 5C 


DOSVOLTB 


DS 


F 




I 60 


DOSEXTTB 


DS 


F 




I 64 


DOSSENSE 


DS 


H 




I 66 


DOSVOLNO 


DS 


X 


D*9 


I 67 


DOSEXTNO 


DS 


X 


D*10 


I 68 


DOSBOFSP 


DS 


F 




I 6C 


DOSOCNAH 


DS 


CL8 




I 74 


DOSSAYE 


DS 


6F 




I 8C 


DOSEXTCX 


DS 


1X 


D*11 


I 8D 


DOSTYPE 


DS 


1C 


D*12 


I 8E 




DS 


H 




I 90 


DOSEND 


DS 


OD 





OS user-created bit 
Defined for non-CHS disk 
Defined for CMS disk 
Oser catalog data set 
Permanent control block 
Search VSAM job catalog 
Search VSAM user catalog 

AL3(next DOSCB) 

DLBL to distinguish from CMSCB 

Data definition name 

CMS operation 

Tape identification 

Data set name 

Data set type 

Data set mode 

Reserved for IBM use 

A (input/output buffer) 

Size of buffer (data count) 

File format: fixed/variable 

Extended PLIST 

Reserved for IBM use 

Number of bytes actually read 

Item (record) number 

Records per CMS physical block 

Device type code 



Dummy device 
Disk 

Tape mode set to save 

Block size 

Work area 

Logical unit for CMS/DOS 

SYS/PROG unit: X»00»=SYS, X'OI^PROG 

Number from 000-255 associated with the unit 

Number of DOS extents left to process 

Current DOS extent 

Pointer to OS FST 

Pointer to OS dsname block 

A (volume ID table) — VSAM multivolame data set 

A (extent table) for VSAM data space 

I/O sense data 

No. of volumes (entries in DOSVOLTB) 

No. of extents (entries in DOSEXTTB) 

Size of VSAM I/O buf f er (s) 

VSAM user catalog ddname 

Temporary save area for re-entrant code 

Current extent (used by DMSXCP) 

Data set type (SAH=S, VSAM=A) 

Reserved for IBM use 

End address of this block 



DOSENSIZ EQO (*-D0SSECT) /8 Size of block in doublewords 
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EDCB: EDIT CONTROL BLOCK 

EDCB is used by all CMS EDIT modules to define common free storage control blocks. It is 
initialized by DMSEDX, the EDIT bootstrap routine, and built dynamically from user free 
storage each time a user issues the EDIT command. 



0| 

1 


FNAHE 




■ 


1 

8| 
i 


FTYPE 






10| 

i . , ... 


FMODE | A*1 | A*2 | 


TRUNCOL | ZOHE1 




18| 
■ 


Z0NE2 | VERCOL1 | 


VERC0L2 | VERLEH 




20| 
1 


SCRBOFAD | 


CARDINCR 





28| LMSTART 
| 



LMINCR 



| A*3 | A*4 | 
i 



TABS 



48 
50 
58 
60 
68 
70 
78 
80 
88 
90 



SEQNAME 


I a*5 i 


PADBUF 


PADB0F (cont.) 




I //////////////////// 


PTR1 


PTR2 


I 


PTR3 


AEXTEHD 


I 


CORITEH 


SPARES 


I 


FPTR 


ITEH 


I 


AFSTFNRD 


FREELEN 


I 


FREEAD 


EDRET 


I 


EDMSK 



MAINAD 



AUTOREG 



C8| 
I 

DO | 
I 

D8| 
I 

E0| 



CARDN0 



COUNT 



LMC0RR 



BOFFL 



BDFFA 



CANSAV 



100| 



DDALNOS 
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BOALNOS fcont.l 



1F8| 



DECIMAL 



HALF 



200I 



REGSAVE 



210 
218 



REGSAVX 



HJSJfUHX 



SAVEAR 



260 


XYCNT 


i 


CHNGNUM | 


268 


TIN I 


270 


I AEDLIN 


I A*6 


I I 


278 


TOOT I 


280 


//////I 


I 


I A*7 | | 


288 


IOLIST | 


290 


IOID | 


298 




2A0 


IOMODE | 


I 


IOAD | 


2A8 




! A*8 


a*Q i ///////////////i 

— - irrrrrrrrrrrrrrf* 


2B0 


| PLSTITEH | 


2B8 


RECS | | 


2C0 


| ALTLIST | 


2C8 


ALTLIST (cont.) 


I 


ERDHORK | 


2D0 


ERDWORK (cont.) | | 


2D8 


I ALTMODE | 


2E0 


ALTHODE (cont.) 


I 
—a 





1 — 

300| 
i 


1 


STACKAT 




308| 
1 


STACKAT (cont.) | 






310| 

i — 


STACKATL | 


ATTN 


i 
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r 
318| 


ATTN (cont.) 


I 




i 


320| 




ATTNLEH 


I 




RENLIST | 


3281 


RENLIST (cont.) 


I 




RPLIST | 


3301 






RPLIST 


(cont. 


) 1 


3381 




STRTNO 


I 




INCRNO | 


340| 




AINCORE 


I 




FSIZE | 


348| 






DECLTH 






350| 






RANGE 






358L 


V///////////////////////HESYD V//////////////////////// I 


360| 


A*10 


| BOFAD 


I A* 11 I A* 12 | WRCOONT | 


368| 




BUFFLOC 






ALINELOC | 


370| 




ANOMLOC 






AFLAGLOC | 


378| 




TRNCNUM 




AUTOCNT | AOTOCORR | 


380| 


CHNGCNT | DITCNT 




EDCT 


| LINELOC | 


388| 


N0ML0C | SAVCNT 




TVERCOL1 | TVERCOL2 | 


390| 


A*13 


I A*14 | 




AREA 




398| 


AREA 


(cont.) | A*15 | A*16 | 

■ 






3A0| 






CHNGHSG 


• 


3B0| 




I 


CHGTRONC 




3B8| 

1 . 






1 1 

, _, .,._! 1 


3C0| 




(unidentif ie 


a) 




3C8| 




CMODE 


I 

___ „.;i 






3D01 






FILEHS 


• 



I A*17 | A*18 



3E8| A*19 | 
| j 



JAR 



I NEWNAME 



438| 



NEWNAME (cont.) 



I NEWTIPE 



440! 



448 



NEWTYPE (cont.) 



I NEWHODE 



I A*20 



SERSAV (cont.) 



I A*21 
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458| 



TEHPT&B 



i 1 

I A*24 | 1*25 | 



470| A*26 | A*27 | 



SCLNO 



478| SCLNO (cont.) | A*28 | A*29 | XAREA | 
| 1 



(Saae length as EDLIN) 



YAREA 



508| 



(Sane length as EDLIN) 



I 

590| 

| _ 

598| 

| 

5A0| 

| 

5A8| 

| 

5B0 1 HACROHDR (cont) | IN7LD 



I A*30 



XXXCWD 



SAVCWD 



INVLDHDR 



HACROHDR 



HACRO 



5B8| 

I 

5C0| 

i 
6401 



EDLIN 



6E8 



LINENO 



| A*31 | 
1 



LINE 



I A*32 | 



TABLIN 
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Hexadecimal 
Displacement 



10 
12 
13 

14 
16 

18 
1A 
1C 

1E 
20 
24 
28 
2A 

2C 
2D 
2E 



48 
4B 



4C 



55 



Field 
Name 



BLOC 

FNAME 

FTYPE 

FMODE 

FV 

CASESW 

TRONCOL 

Z0NE1 

Z0NE2 

VERCOL1 

VERCOL2 

YERLEN 

SCRBOFAD 

CARDINCR 

LMSTART 

LMINCR 

FLAG 

FLAG2 

TABS 



DS 

EQO 

DS 
DS 
DS 
DS 
DS 
DS 
DS 

DS 
DS 
DS 
DS 
DS 
DS 
DS 
DS 

DS 
DS 
DS 



ENDTABS EQD 

SEQNAME DS 
PADCHAR DS 



Field Description, Contents, Meaning 
OF 



CL8 Filename 

CL8 Filetype 

CL2 Filemode 

CL1 A*1 Record format 

CL1 A*2 Case setting 

H Truncation column 

H Beginning zone initialized to first 

column 
H End zone 

H Verify column 1 

H Verify column 2 

H Verify length 

F Address of GETHAIN buffer 

F Increment for serialization 

H Where line numbers start 

B Automatic line numbers using default 

increment 

CL1 A*3 Flags for line monitoring 

CL1 A*4 Miscellaneous flags 
26AL1 Maximum of 25 tabs is allowed 

* End of tabs 

CL3 Name, if any, for serialization 

CL1 A*5 »0» on right, ■ ■ on left 



ENDBLOC EQO * End of blocks 

Note; PADBOF must remain directly behind PADCHAR 
PADBUF DS 9C Pad characters 



PTRCONS EQO 



58 


PTR1 


DS 


2F 


60 


PTR2 


DS 


F 


64 


PTR3 


DS 


F 


68 


AEXTEND 


DS 


F 


6C 


CORITEM 


DS 


F 


70 


SPARES 


DS 


F 


74 


FPTR 


DS 


F 


78 


ITEM 


DS 


F 


7C 


AFSTFNRD 


DS 


F 


80 


FREELEN 


DS 


F 


84 


FREEAD 


DS 


F 


88 


EDRET 


DS 


F 


8C 


EDMSK 


DS 


F 


90 


HAINAD 


DS 


F 




EPTRCONS 


EQO 


* 


94 


AOTOREG 


DS 


13F 


C8 


CARDNO 


DS 


F 


CC 


COONT 


DS 


F 


DO 


LBCORR 


DS 


2F 


D8 


BOFFL 


DS 


F 


DC 


BOFFA 


DS 


F 


E0 


CANSAV 


DS 


9F 


104 


DOALNOS 


DS 


CL240 


1F8 




DS 


0D 


1F8 


DECIMAL 


DS 


F 



DMSEDI line pointers 

Pointer to top of file (for dummy top line) 

Current line pointer 

Pointer to bottom line 

Pointer to end of used area of storage 

Number of bytes for one line in storage 

Number of spare lines 

Free list pointer 

Item length 

Anchor for stacked lines upon entry 

Length of free storage 

Address of free storage 

CMS return address 

DMSSCR edit mask 

LOADSTS address; if LOADMOD 

DMSEDI save areas and buffer pointers 

Autocheck save area 
Save area for seguence number 
Number of characters in EDLIH 
Prompter current line number 
Length of string (EDC) 
Address of string (EDC) 
Register save (EDC) 
Temporary string buffer (EDC) 

Used by DECBIN and BINDEC 
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Hexadecimal 


Field 








Displacement 


Nape 
HALF 


DS 


F 


Field Descri n tion^ Contents, Meaning 


1FC 


BINDEC only edits four characters 


200 


REGSAY 


DS 


5F 


Register save area 


214 


REGSAYX 


DS 


3F 


u@tjXoi.ci- oa>c clj-^o. 


220 


REPCNT 


DS 


F 


FOR count 


224 


SATEAR 


DS 


15F 


DMSSCR save area 


260 


XYCNT 


DS 


F 


X or Y execution count 


264 


CHNGNUM 


DS 


F 


Number of lines to change 


268 


TIN 


DS 


OF 


WAITRD PLIST 


268 




DS 


CL8 


WAITRD 


270 




DS 


X 


•1' for console No. 1 


271 


AEDLIN 


DS 


3X 


A (EDLIN) 


274 


CASEREAD 


DS 


C 


A*6 Default to uppercase 


275 




DS 


3X 


Length put here 


278 


TOUT 


DS 


OF 


TYPLIN PLIST 


278 




DS 


CL8 


TYPLIN 


280 




DS 


X 


• 1* for console No. 1 


281 




DS 


3X 


Address goes here 


284 




DS 


C 


•B* for black ribbon 


285 


TYPFLG 


DS 


X 


A*7 X»20* maximum length override 


286 




DS 


H 


Length goes here 




CRBIT 


EQU 


X*80* 


Suppress carriage return 


288 


I0LIST 


DS 


OF 


Initialization for state of source 


| 288 




DS 


CL8 


ESTATE 


290 


IOID 


DS 


CL8 


EDIT 


298 




DS 


CL8 


CMSUT1 


2A0 


IOMODE 


DS 


CL2 


A1 


| 2A2 




DS 


H 


Reserved for IBM use 


2A4 


I0AD 


DS 


CL4 


Do not allow asterisks 


2A8 




DS 


F 


133 (XINSCRIPT use LINE) 


| 2AC 




DS 


0CL2 


F/V and null record indicator 


| 2AC 


PLSTFY 


DS 


CL1 


A*8 FV flag byte 


I 2AD 


PLSTFLGS 


DS 


X 


A*9 PLIST flag byte (extended PLIST) 


I 2AE 




DS 


H 


Reserved for IBM use 


| 2B0 




DS 


F 


Read byte count 


I 2B4 


PLSTITEM 


DS 


F 


Extended item number 


I 2B8 


RECS 


DS 


F 


Number of items extended 


| 2BC 




DS 


F 


Write pointer 


! 2C0 




DS 


•p 


Read pointer 


j 2C4 


ALTLIST 


DS 


OD 




| 2C4 




DS 


CL8 


RENAME 


I 2CC 


EDHORK 


DS 


CL8 


EDIT 


I 2D4 




DS 


CL8 


CMSDT1 


I 2DC 


ALTMODE 


DS 


CL8 


A1 


I 2E4 




DS 


CL8 


New filename 


I 2EC 




DS 


CL8 


New filetype 


I 2F4 




DS 


CL2 


»*t 


I 2F6 




DS 


CL6 


New filemode 


I 2FC 




DS 


8X 


FF fence 


I 304 


STACKAT 


DS 


OF 


PLIST to stack first in first out 


I 304 




DS 


CL8 


ATTN 


I 30C 




DS 


CL4 


First in first out 


I 310 


STACKATL 


DS 


F 


Length and address of line to stack 


I 314 


ATTN 


DS 


OF 




I 314 




DS 


CL8 


ATTN 


I 31C 




DS 


CL4 


Last in first out 


! 320 


ATTNLEN 


DS 


F 


Length and address of line to stack 


I 324 


RENLIST 


DS 


OF 


RENDM PLIST 


I 324 




DS 


CL8 


RENUM 


! 32C 


RPLIST 


DS 


CL12 


Fileid 


I 338 


STRTNO 


DS 


F 


Starting number 


I 33C 


INCRNO 


DS 


F 


Increment number 


I 340 


AINCORE 


DS 


F 


In-storage copy address 
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Hexadecimal 


Field 








Displacement 


Name 








I 344 


FSIZE 


DS 


F 




I 348 


DECLTH 


DS 


D 




I 350 


RANGE 


DS 


D 




I 358 


RESVD1 


DS 


D 




I 360 


CHDBLOK 


DS 


X 


A*10 


j 361 


BOFAD 


DS 


3X 




I 364 


FLG 


DS 


X 


A*11 


| 365 


CTL 


DS 


X 


A*12 


| 366 


WRCOONT 


DS 


H 




| 368 


GIOPLIST 


DS 


OF 




| 368 


BOFFLOC 


DS 


F 




| 36C 


ALINELOC 


DS 


F 




| 370 


AHOMLOC 


DS 


F 




| 374 


AFLAGLOC 


DS 


F 




| 378 


TRNCNOM 


DS 


F 




| 37C 


AUTOCNT 


DS 


H 




j 37E 


AOTOCORR 


DS 


H 




| 380 


CHNGCNT 


DS 


H 




| 382 


DITCNT 


DS 


H 




I 384 


EDCT 


DS 


H 




| 386 


LINELOC 


DS 


H 




| 388 


NUMLOC 


DS 


H 




| 38A 


SAVCNT 


DS 


H 




| 38C 


TVERCOL1 


DS 


H 




I 38E 


TVERCOL2 


DS 


H 




| 390 


ALCHAR1 


DS 


C 


A*13 


I 391 


ALCHAR2 


DS 


C 


A*14 


I 392 


AREA 


DS 


CL8 




I 39A 


BYTE 


DS 


X 


A*15 


I 39B 


CHNGFLAG 


DS 


X 


A* 16 


| 39C 


CHNGMSG 


DS 


CL20 




| 3B0 




DS 


2X 




I 3B2 


CHGTRONC 


DS 


13X 




I 3BF 




DS 


9X 




I 3C8 


CMODE 


DS 


CL4 




I 3CC 


FILEMS 


DS 


CL26 




I 3E6 


FLAGLOC 


DS 


X 


A*17 


I 3E7 


GETFLAG 


DS 


X 


A*18 


I 3E8 


HOLDFLAG 


DS 


X 


A* 19 


I 3E9 


JAR 


DS 


(ENDBLOC- 


-BLOC) 


I 435 


NEWNAHE 


DS 


CL8 




I 43D 


HEHTYPE 


DS 


CL8 




I 445 


NEWMODE 


DS 


CL2 




I 447 


SERSAV 


DS 


CL8 


A*20 


I 44F 


SERTSEQ 


DS 


CL3 


A*21 


I 452 


SERTSH 


DS 


X 


A*22 


I 453 


SIGNAL 


DS 


X 


A*23 


I 454 


TEMPTAB 


DS 


(ENDTABS- 


-TABS) 


| 46E 


0TILFLAG 


DS 


X 


A* 24 


I 46F 


XYFLAG 


DS 


X 


A*25 


I 470 


SCRFLGS 


DS 


X 


A* 26 


I 471 


SCRFLG2 


DS 


X 


A* 27 


I 472 


SCLNO 


DS 


8C 




I 47A 


TWITCH 


DS 


X 


A*28 


I 47B 


TYPSCR 


DS 


X 


A*29 


I 47C 


XAREA 


DS 


H 




I 47E 




DS 


CL135 




I 506 


YAREA 


DS 


H 




I 508 




DS 


CL135 




I 58F 










I 590 




CNOP 


6,8 




I 596 




DS 


X 




! 597 


BLANK1 


DS 


X 


A*30 


I 598 


XXXCWD 


DS 


CL8 





Field Description, Contents, Meaning 

Record length 

DMSSCR work area 

Message data areas 

Reserved for IBM use 

X*19» 

Buffer address 

CCW flag 

Control byte 

Write count 

DMSSCR PLIST for DMSGIO 

Buffer location 

Address of line location 

Address of number location 

Address of flag location 

Number of lines truncated 

Autosave parameter 

Current modification count 

Temporary area for change 

Lines count stacked by REOSE (=) Subroutine 

Next char in EDLIN 

Display line number 

Display count 

Length of last saved reguest not beginning 
with either a ? or = 

Temporary area for verifying column 1 

Temporary area for verifying column 2 

Temporary byte used by ALTER 

Temporary byte used by ALTER 

EDIT instruction work 

Temporary byte (used by GET) 

Flag for change 

Lines changed message 

C«,« 

CV...LINE(S) • 

C'TRONCATED 1 

Filemode for MODECHK routine 

Retry message 

Flag for DMSGIO 

Flag for GETFILE 

DMSSCR SCRFLGS 
AL1 Save area for preserve 

Name area for FILE and SAVE commands 

Type area for FILE and SATE commands 

Mode area for FILE and SAVE commands 

Identification number for save area 

Temporary byte identification number area 

Temporary byte used by identification number 

Signal between routines 
AL1 Temporary spot for new tabs 

DMSSCR utility flags 

X/Y active flag 

Screen function flags 

More screen function flags 

Save LINEMODE sequence number 

Location flags 

Display unit size index value 

X length and request buffer 

(Same length as EDLIN) 

Y length and request buffer 

(Same length as EDLIN) 



Alignment for XXXCWD 
Additional alignment for XXXCWD 
A*30 Blank for clearing XXXCWD 
EDIT token buffer 
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1DCB 



Hexadecimal Field 
Displacement Haie 



5i0 
5A8 



SAVCWD DS 
INVLDHDR DS 



CL8 
CL6 



Field Description, Contents, Meaning 

Location at which contents of XXXCWD 

are saved 
?EDIT: (for invalid request ■essaae) 
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EDCB 



Hexadecimal 
Displacement 

5AE 
5B2 



5B4 



5B8 

5B9 
630 
635 
636 
6E6 
6E7 
788 



Field 
Name 

MACROHDR DS 
INVLD DS 



MACRO 



EDLIN 

LIHENO 

BLANK2 

LINE 

BLANR3 

TABLIN 

EDCBEND 



ORG 

DS 

ORS 
DS 

DS 
DS 
DS 
DS 
DS 
DS 
DS 



Field Description, Contents, Meaning 

CL4 EXEC for EDIT macro stacking 

OCLe^EDIT: 1 Location to store invalid header 



INVLD*2 
0CL4'EXEC* 

MBCRO*4 

C 

CL135 

CL5 

X 

CL160 

X 

CL160 

0D ~" 



Location to hold macro header (if invalid) 



Blank used for clearing EDLIN 

Terminal input buffer 
Line number for typeout 

A*31 Blank for clearing line 

Current line is held here 

A*32 Blank for clearing TABLIN 

fln+nnt frn» eT\T-oafl 



EDCBLTH EQU (EDCBEND-EDCB) Length of EDCB in doublewords 
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ERDSECT 

ERDSECT: ERROR HA52I:I5G ROUTIHE DSECT 

ERDSECT describes the fields in a work area used for giving responses and error messages 
via the DMSERR or LINEDIT Macros. A V-constant in DMSERR points to the DMSERT CSECT in 
DMSNUC. 




58 



ERPAS13 



AO 
A8 
BO 
B8 
CO 
C8 
DO 
D8 
EO 



I A*1 | A*2 | 




« ERPTXA 




I ERPHOM | 


A*3 | 


ERPCS | 




I ERPBFA 




| ERPSBA 




| ERSBD 




| A*U | A*5 | 




| ERSSZ | I 


I (Doubleword preceding text) I 


I ERHESS 


I 


ERSECT | 


ERNUH | 


I | A*6 | 


A*7 | 


ERTEXT 











160 | 

I 

168 | 



ERTPL 



ERTPLA 



ERTPLL 
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EXTUAREA 



EXTOAREi: EXTERNAL USER AREA 

EXTOAREA is a 96-byte user area generated by the CHSAVE aacro. The pointer to the user 
area is passed to the user via register 13- The DSAVEPTR field in CMSAVE also points to 

f lia near aroa 



GRS 



40 



FRS 



60 



68 | 



UEXTPSWO 



USERAREA 



Hexadecimal Field 
Displacement Name 





DS 


0D 





GRS DS 


16F 


40 


FRS DS 


4D 


60 


DEXTPSWO DS 


1D 


68 


OSERAREA DS 


18F 


BO 


OSEREAND DS 


OF 



Field Description, Contents, Meaning 



Registers at time of interrupt 
Floating-point registers at interrupt 
External old PSW at interrupt 
User save area 
End user area 
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FCBSECT 

FCBSECT: SIMULATED OS CONTROL BLOCKS 

FCBSECT consists of the CMS File Control Block (FCB) (used for file management under 
CMS) , the simulated OS Job File Control Block (JFCB) , Input/Output Block (IOB) , and Data 
Extent Block (DEB) . FCBSECT is invoked via the CMSCB macro. FCBSECT is dynamically 
allocated from CHS free storage each time the FILEDEF command is issued. 



10 



18 



20 



28 



30 



38 



40 



48 



50 



58 



60 



68 



70 



78 



80 



88 



90 



98 



A0 



A8 



B0 



B8 



CO 



C8 



r - ■ 

| FCBNEXT 


I 


FCBPROC | 


| FCBDD I 


| FCBOP I 


| FCBDSNAM I 


| FCBDSTYP | 


| FCBDSMD I /////////////I 


FCBBOFF f 


| FCBBYTE 


I A*1 | 


A*2 | ///////////// I 


| FCBREAD 


I 


FCBITEM | 


| FCBCOOT 


I 


FCBHPTR | 


| FCBRPTR 


I A*3 | 


A*4 | FCBXTENT | 


| FCBRECL 1 A*5 


I A*6 | 


FCBR13 | 


| FCBKEYS 


I 


FCBPDS | 


| JFCBMASK | 


| JFCBCRDT 


| JFCBXPDT 


I A*7 | A*8 | 


| A*9 | A*10 | JFCBOFL | A*11 | 


A* 12 I //////| I 


| JFCLIMCT(cont.) | JFCDSORG | A*13 | 


A*14 | JFCBLKSI | 


| JFCLRECL | A* 15 


A* 16 I /////////////////////////// I 


I DEBTCBAD 


I 


SEBSAV | 


| DEB0FL6S 


I 


DEBOPATB I 


| IOBNXTAD 


I 


IOBECB | 


| DEBDCBAD 


I 


IOBECBPT | 


| IOBCSW I 


| IOBSTART 


I 


IOBDCBPT | 


| FCBMEMBER | 


| FCBOSFST 


I 


FCBOSDSN | 
r 


| FCBXTENT 


I 
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FCBSECT 



| • Special Fields for Tape Files Only 



18 | 
i 


FCBTAPID 


| A*17 


| A*18 | 


| FCBPOS 


I 
■ 


20 | 

L- 




FCBNSLNM 






i 

1 
j 



20 



FCBIOODT 



28 | FCBIOODT (cont.) 



FCBIOBDF 



30 | A*19 | A*20 | FCBIOCNT | 
i 1 



B8 | 



FCBLABPT 



FCBBLKCT 
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Hexadecimal Field 

Hi *-«t\1 -ss*AmAn+' Iff an a 
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FCBSECT 



Tiolfl nPRrriDtion. Contents. Heaniner 




4 
8 
10 
18 
18 
18 
18 
20 



28 

28 
2A 
2C 
30 
34 
35 
36 
38 
3C 
40 
44 
48 
4C 



4D 
4E 
50 
52 
53 
54 
58 
5C 
60 
68 
6B 
6E 
6F 
70 
71 



FCBINIT 


DS 


OX 


Bits defined 

fcbdosl" equ 


in FCBINIT 
X*20» 


FCBOS 


EQU 


X«10' 


FCBOPCB 


EQO 


X«08V 


FCBPERM 


EQU 


X'04 1 


FCBBATCH 


EQU 


X'02» 


FCBCATHL 


EQU 


X«01« 


FGBNEXT 


DS 


A 


FCBPROC 


DS 


A 


FCBDD 


DS 


CL8 


FCBOP 


DS 


CL8 


IHAJFCB 


DS 


OD 


JFCBDSNH 


DS 


OX 


FCBTAPID 


DS 


OX 


FCBDSNAH 


DS 


CL8 


FCBDSTYP 


DS 


CL8 




0R5 


FCBDSTYP 


FCBPRPO 


EQU 


FCBDSTYP+4 


FCBTBSP 


DS 


OX 


FCBDSHD 


DS 


CL2 




DS 


H 


FCBBUFF 


DS 


F 


FCBBYTE 


DS 


F 


FCBFORM 


DS 


CL1 


FCBEPL 


DS 


XL1 


FCBCOOT 


DS 


H 


FCBREAD 


DS 


F 


FCBITEH 


DS 


F 


FCBCOUT 


DS 


F 


FCBWPTR 


DS 


F 


FCBRPTR 


DS 


F 


FCBDEV 


DS 


X 


Bits defined 


in FCBDEV 


FCBCRT~ 


EQU 


28 


FCBPCH 


EQU 


24 


FCBDSK 


EQU 


20 


FCBTAP 


EQU 


16 


FCBCON 


EQU 


12 


FCBRDR 


EQU 


8 


FCBPTR 


EQU 


4 


FCBDUH 


EQU 





FCBHODE 


DS 


X 




DS 


H 


FCBRECL 


DS 


H 


IOBIOFLG 


DS 


X 


FCBDCBCT 


DS 


X 


FCBR13 


DS 


F 


FCBKEYS 


DS 


A 


FCBPDS 


DS 


A 


JFCBMASK 


DS 


8X 


JFCBCRDT 


DS 


3C 


JFCBXPDT 


DS 


3C 


JFCBIND1 


DS 


X 


JFCBIND2 


DS 


X 


JFCBUFNO 


DS 


X 


JFCBFTEK 


DS 


ox 



Initialization flag bytes 



Concatenated DOSLIB data set 
FCB for OS formatted disk 
OPEN acquired this CHS block 
Permanent control block 
Special batch data set 
Concatenated HACLIB data set 

AL3(next CHSCB) 

A (special processing routine) 

Data definition name 

CHS operation 

Job file control block 

44 bytes, data set name 

Tape identification 

Data set name 

Data set type 



Printer/punch command list 

Two bytes for tape backspace 
count 

Data set mode 

Reserved for IBH use 

A (input/output buffer) 

Data count 
A*1 File format: fixed/variable records 
A*2 Extended PLIST flag byte 

Records per CHS physical block 

Number of bytes actually read 

Extended PLIST item count 

Extended PLIST item count 

Extended PLIST write pointer 

Extended PLIST read pointer 
A*3 Device type code 



CRT 

Punch 

Disk 

Tape 

Console terminal 

Reader 

Printer 

Dummy device 

Hode: 1, 2, 3, 4, and 5 

Reserved for IBH use 

DCB LRECL at open time 

I/O flags 

No. of DCBs using this FCB 

Save area vector R13 

A(DDS in-storage key table) 

A (PDS in-storage directory) 

Various mask bits 

Data set creation date (YDD) 

Data set expiration date (YDD) 

A*7 Indicator one 

A*8 Indicator two 

A*9 Number of buffers 

Buffering technique 



A*4 



A*5 
A*6 
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FCBSECT 



Hexadecimal 


Field 






Displacement 


Name 






71 


JFCBFALN 


DS 


X 


72 


JFCBDFL 


DS 


H 


in 


JFCEROPT 


DS 


X 


75 


JFCKEYLE 


DS 


X 


76 




DS 


X 


77 


J FwLIM^»T 


DS 


3X 


7A 


FCBDSORG 


DS 


OX 


7A 


JFCDSORG 


DS 


2X 


7C 


FCBRECFM 


DS 


OX 


7C 


JFCRECFM 


DS 


X 


7D 


JFCOPTCD 


DS 


X 


7E 


FCBBLKSZ 


DS 


OH 


7E 


JFCBLKSI 


DS 


H 


80 


FCBLRECL 


DS 


OH 


80 


JFCLRECL 


DS 


H 


82 


FCBIOSW 


DS 


X 



83 



Bits defined in FCBIO SW 

FCBCLOSE EQO X»80* 

FCBCLEAV EQO X«40» 

FCBPROCC EQO X«20» 

FCBPROCO EQO X«10' 

FCBCASE EQO X'OS' 

FCBP7MB EQO X«04» 

FCBIOWR EQO X'02» 

FCBIORD EQO X«01« 



FCBIOSW2 DS 



1X 



Bits defined in FCBIOSW 2 

fcbmvfil'eqo x'OS 1 
fcbmm? eqo x«02» 
fcbmvpds eqo x'01« 



84 


DEBLNGTH 


DS 


OX 






ORG 


DEBLNGTH 




FCBTCLOS 


EQO 


X'40' 


84 




DS 


F 


88 


IHADEB 


DS 


OD 


88 


DEBTCBAD 


DS 


A 


8C 


SEBSAT 


DS 


F 


90 


DEBOFLGS 


DS 


4X 


94 


DEBOPATB 


DS 


4X 


98 


IOBFLG 


DS 


OX 



Bits defined in IOBFLG 
IOBBFLG ~EQO ~ o" 
IOBOOT EQO X^O 1 
IOBIN EQO X»20» 
IOBOPD EQO X'10' 



98 


IOBNXTAD 


DS 


A 


9C 


IOBECB 


DS 


F 


AO 


IHAIOB 


DS 


OF 


AO 


DEBDEBID 


DS 


OX 


AO 


DEBDCBAD 


DS 


A 


A4 


IOBECBCC 


DS 


OX 



Bit s defined in IOBECBCC 
IOBBECBC~EQO 12~ 
IOBBECBP EQO 12 



Field Description, Contents, Meaning 

A*10 Buffer alignment 

Buffer length 
A* 11 Error option 
A*12 Key length 

Reserved for IBM use 

BDAM search limit 

Data set organization 

Data set organization 

Record format 
A* 13 Record format 
A* 14 Option codes 

Block size 

Block size 

Logical record length 

Logical record length 
A* 15 I/O operation indicator 



Snitch turned on during CLOSE operation 
DISP=LEAVE during CLOSE operation 
GOTO FCBPROC during CLOSE operation 
GOTO FCBPROC during OPEN operation 
ON=LOWER CASE console I/O 
POT-MOVE-VAR-BLK 
WRITE/POT 
READ/GET 

A* 16 I/O operation indicators 



Move file is active 

Move PDS switch for FIND 

Switch for MOVEFILE with PDS option 

Length of DEB in doublewords 

A type T close was done 

Reserved for IBM use 

Data extent block 

A (move-mode user buffer) 

Dynamic save for SEB return address 

(OS input/output simulation) 
Data set status flags 
OPEN/CLOSE option byte 
Start of IOBPREFIX for normal scheduling 

Displacement of IOB flag in IOB 
WRITE, POT in progress 
READ, GET in progress 
QSAM POTX in progress 

A (next buffer to be used) 

ECB for QSAM normal scheduling 

Input/output block 

DEB identification 

A (data control block) 

ECB completion code 



Displacement of ECB code in IOB 
Displacement of ECB pointer in IOB 
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FCBSECT 



Hexadecimal Field 

ni enl arpient Nane 



A4 
A8 



A8 
BO 
B4 

B8 
B8 
CO 
CH 
C8 
DO 



18 
1C 



1D 



IOBECBPT 


DS 


A 


I0BFLAG3 


DS 


OX 


IOBBCSW 


EQU 


16 


IOBCSB 


DS 


8X 


IOBSTART 


DS 


A 


IOBDCBPT 


DS 


A 


IOBEND 


DS 


OX 


FCBHEMBR 


DS 


2F 


FCBOSFST 


DS 


F 


FCBOSDSN 


DS 


F 


FCBXTENT 


DS 


F 


FCB1ND 


DS 


OD 



Field Description. Contents- Meaning 

A (event control block) - see IHADECB DSECT 
I/O error flag 

Displacement of CSW in IOB 

Last CCW stored (that is, residual count) 
X« ID-NEXT BUFFER' r AL3 (IHITIAL BUFFER) 
A (data control block) 

End of input/output block 

OS PDS member name 

Pointer to OS FST 

Pointer to OS DSNAME block 

Number of items in extent 

End of FCB, JFCB, DEB, and IOB blocks 



Redefined Fields for Tape Files 

ORF FCBDSNAM 
FCBTAPID DS CL4 Tape identification 

FCBLABT DS 1X A* 17 Tape label type 



Bits defined in FCBLABT 



FCBNL EQU 

FCBNSLMD EQU 

FCBNSL EQU 

FCBSUL EQU 

FCBUSER EQU 

FCBSL EQU 

FCBBLP EQU 

FCBOFF EQU 

FCBTPSW DS 



X f 20» 
X 1 10* 

X*08» 

FCBSL*FCBUSER 

X'04 1 

X'02* 

X»01» 

X«00« 



Nonlabel 

NSL routine is a module 

Nonstandard user labels 

IBM and user standard labels 

User standard labels 

IBM standard labels 

Bypass labels — just position the tape 

No label processing at all 



1X 



A*18 Tape switch 



Bits defined in FCBTPSW 
FCBLEATE~EQU ~" X«80«~ 
FCBNOEOV EQU X'40' 



1E 


FCBPOS 


DS 


1H 


20 


FCBNSLNM 


DS 


CL8 






0R5 


FCBMEMBR 


B8 


FCBLABPT 


DS 


A 


BC 


FCBBLKCT 


DS 


1F 






ORG 


FCBDSTYP+4 


2H 


FCBIOOUT 


DS 


CL8 


2C 


FCBIOBUF 


DS 


A 


30 


FCBCONCR 


DS 


r 


31 


FCBCONMS 


DS 


X 


32 


FCBIOCNT 


DS 


H 



Do not reposition tape for open 
Do not EOV processing at all 

Position parameter 
NSL routine name 



Pointer to LABSECT block 
Block count for tape file 



Special I/O command list 

A (data buffer) 
A* 19 Console color code 
A*20 Console miscellaneous information 

I/O count for data buffer 

FCBENSIZ EQU (*-FCBSECT) /8 Size of FCB entry in doublewords 
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FCHTAB 

FCHTAB; FETCH TABLE 

FCHTAB contains a fetch/load parameter list that points to a 34-byte directory list. The 
fetch table is used when a POS program issues a LOAD or FETCH request without the LIST= 
parameter. The IJBFTTAB field in the SYSCOH block in the DOSCON CSECT of HOCOH points to 
the fetch table. 



10 



18 



20 



28 



1 

I FCHAPHHM 




1 A*1 | 


FCHALSHM 


i 


1 DIRNAME | 


I DIRTTR 




| A*2 | DIRTT 


| DIRLL 




I A*3 |/A*4//I 




DIRPPP | 


DIREEE 




| DIRRR | 


A* 5 


I DIRAAA 


l/A*6//| 




| DIRVEE | 
i — 








1 



Hexadecimal Field 
Displacement Name 



Field Description, Contents, Meaning 



8 
10 
13 
14 
16 
18 



19 
1A 
1D 
20 
22 
23 
26 
27 



8-B yte Parameter List Pointing to Directo ry List 
FCHAPHHM DC A (DIRHAHE) Address of phase name 
FCHOPT DC X^O 1 A*1 Options 
FCHALSHH DS AL3 Address of listname 



34-B yt e Directory List 
DIRHAME ~DS CL8 



DIRTTR 


DS 


XL3 


DIRH 


DS 


XL1 


DIRTT 


DS 


XL2 


DIRLL 


DS 


XL2 


DIRC 


DS 


XL1 


Bits defined 
SELFREL EQD 


in DIRC 
X T 80» 


RELPHSE 


EQU 


X'lO* 


SVAELIG 


EQD 


X»20» 


SVAPHSE 


EQD 


X«10» 


PCLPHSE 


EQD 


x'os 1 


PHOTFHD 


EQD 


X»0<*» 


DACTIVE 


EQD 


X«02» 


HOTEXT 


EQD 


X»01« 


DIRT 


DS 


XL1 


DIRPPP 


DS 


XL3 


DIREEE 


DS 


XL3 


DIRRR 


DS 


XL2 


DIRR 


DS 


XL1 


DIRAAA 


DS 


XL3 


DIRK 


DS 


XL1 


DIRVEE 


DS 


XL3 



A* 2 



A*3 



A*4 

A*5 
A*6 

FCHLEHG EQD *-FCHTAB 
FCHLENDH EQD (FCHLEHG+7) /8 



Phase name 

Phase TTR 

Ho. of halfwords in directory 

Ho. of text blocks in phase 

Length last text block 

Flag byte 



Phase self-relocatable 

Phase to be relocated 

Phase SVA eligible 

Phase in SVA 

Phase in private core image library 

Phase not found 

Phase directory active 

TEXT=HO specified 

Reserved for IBM use 
Phase load point 
Phase entry point 
No. of RLD items in phase 
Ho. of additional RLD blocks 
Partition start address 
Reserved for IBM use 
Phase entry point in SVA 

Total length in bytes (X*2A f ) 

Total length in doublewords (X'06«) 
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Hexadecimal Field 
Displacement Naae 



44 



48 



TCODE 


EQU 


1* 


Bits defined 


in TCODE 


USERCODE 


EQU 


1 


HOCCODE 


EQU 


2 


TRHCODE 


EQU 


3 


USARCODE 


EQU 


4 


SYSCODE 


EQU 


5 


MAX CODE 


EQU 


5 


♦UNUSED 


EQU 


15 


BLOCKLEN 


EQU 


16 


m T3T» -ruarti * -o 
AX EL£t£t± O.D 




a ir\\ 

a. \v t 


FREEL0W1 


DS 


F 


ACALL 


DS 


A 



Field Description, Contents, Meaning 
FREETAB table code 



User free storage page 

Nucleus free storage page 

Transient area page 

User area page 

System page 

Maximum possible code value 



Symbolic length of block 



Address of FREETAB table 
Original value of FREELOWE 

(set by INIT2) 
Address of caller (for errors) 



4C 



4D 



Fla gs Set by Examining SVC 203 Halfword Code 

FREEFLG1 DC BL1*0' A*1 

Bits defined in FREEFLG1 

Conditional request 
Variable request 
Nucleus request 
FREE (vs FRET) request 
Low storage is OK 
High storage is OK 
Messages wanted on error 
TYPCALL equals BALR in macro 

The Following Byte Holds Flag s Internal to the D MSFRE Routin e 

FBEEFLG2 DC BLVO 1 A*2 



FRF1C 


EQU 


X«80» 


FRF1V 


EQU 


X* 40* 


FHF1N 


EQU 


X«20« 


FHF1E 


EQU 


XMO' 


FKF1L 


EQU 


X«08» 


FRF1H 


EQU 


X f 04' 


FRF1M 


EQU 


X f 02« 


FRF1B 


EQU 


X«01* 



Bits defined in FREEFLG2 
FRF2CL EQU X«80» 



FRF2SVP 
FRF2NOI 



EQU 
EQU 



X^O' 
X f 20' 



FRF2CKE EQU XMO 1 

FBF2CKT EQU X'OS 1 
FRF2CKX EQU X"04» 

Z£©e Chain Element Descr ipt ion 



Cleanup flag 

Variable pages request flag (SCHVPGE) 

Second initialization routine has not yet 

been called by DMSINS 
Do a check each time FREE 

or FRET is called 
Do a check this time 
Executing CHECK routine now 



POINTER 
SIZE 



EQU 
EQU 



Pointer to next FREE element 
Size of this element in bytes 
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FSCBD: FILE SYSTEM CONTROL BLOCK 



FSCBD is a PLIST defined for general use by routines that use the CMS file systei 
is generated when the user invokes the FSCBD macro. 



FSCBD 



10 



18 



20 



28 



30 



38 



| FSCBCOHH 






| FSCBFN | 


| FSCBFT | 


| FFSCBFM | FSCBITNO | 


FSCBBOFF 




| FSCBSIZE | F*1 


| F*2 | FSCBNOIT 


■ 


| FSCBNORD | 


FSCBAITN 




| FSCBANIT | 


FSCBWPTR 


f 


| FSCBRPTR | 







Hexadecimal Field 
Displacement Name 






FSCBCOMM DS 


CL8 




8 


FSCBFN DS 


CL8 




10 


FSCBFT DS 


CL8 




18 


FSCBFM DS 


CL2 . 




1A 


FSCBITNO DS 


H 




1C 


FSCBBOFF DS 


F 




20 


FSCBSIZE DS 


F 




24 


FSCBFV DS 


CL2 


F*1 


25 


FSCBFLG EQD 


FSCBFV+1 


F*2 



Bit s defined in FSCBFLG 
FSCBITAY EQD "x^O* 
FSCBEPL EQD X^O 1 
FSCBRCAY EQD X'01 1 



26 


FSCBNOIT 


DS 


H 


28 


FSCBNORD 


DS 


A 


2C 


FSCBAITN 


DS 


F 


30 


FSCBANIT 


DS 


F 


34 


FSCBWPTR 


DS 


F 


38 


FSCBRPTR 


DS 


F 



Field Description, Contents, Meaning 

File systei command (RDBDF, WRBDF, etc.) 

Filename 

Filetype 

Filemode 

Relative record number to be read/written 

Address of read/write buffer or of STATEFST 

Length of buffer 

RECFM — C'F« or C'V 1 

Flag byte 



Item available 
Extended PLIST 
Previous record null 

Number of records to be read/written 
Number of bytes actually read 
Extended record number 
Extended number of records 
Extended write pointer 
Extended read pointer 
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FSTD 

FSTD; FILE STATOS TABLE ENTRY DSECT 

FSTD describes the fields in a 40-byte file status table entry as found by STATE, STATEH, 
DMSLFS or DHSLFSH. FSTD is functionally equivalent to the FSTSECT DSECT. 



10 



18 



28 



30 



38 



r 




FSTFHAHE 




| FSTFTYPE 


| FSTDATEH | 


FSTTIMEW 


| FSTHRPNT | 


FSTRDPNT 


| FSTFHODE | 


FSTRECCT 


I FSTFCLPT | 


F*1 j F*2 


| FSTFOP 




| FSTADBC 


| FSTAIC 




| F*3 | F*4 


| FSTADATI 


| FSTADATI 


(cont.) 


! /////////////////////////// 



Hexadecimal Field 
Displacement Name 






FSTFHAME 


DS 


1D 


8 


FSTFTYPE 


D5 


1D 


10 


FSTDATEH 


DS 


1H 


12 


FSTTIHEH 


DS 


1H 


14 


FSTHRPHT 


DS 


1H 


16 


FSTRDPNT 


DS 


1H 


18 


FSTFHODE 


DS 


1H 


1A 


FSTRECCT 


DS 


1H 


1C 


FSTFCLPT 


DS 


1H 


1E 


FSTRECFH 


DS 


1C F*1 


1F 


FSTFLAGS 


DS 


1X F*2 




Bits defined in FSTFLAGS 




FSTXHDSK 


EQO 


X«C0« 




FSTRHDSK 


EQO 


X«80« 




FSTXRDSK 


EQO 


X«40», 




FSTFILEA 


EQO 


X'07' 




FSTACTRD 


EQO 


X'04* 




FSTACTHR 


EQO 


X«02 f 




FSTACTPT 


EQO 


X«01» 




FSTRODSK 


EQO 


X«00» 




Bits redefined 
FSTDIA EQO 


for use in RD 
X'40 1 




FSTDRA 


EQO 


X'01» 




FSTDHI 


EQO 


X'OO' 


20 


FSTLRECL 


DS 


1F 


24 


FSTBLKCT 


DS 


1H 


26 


FSTYEARH 


DS 


1H 


f 28 


FSTFOP 


DS 


F 


I 2C 


FSTADBC 


DS 


F 


! 30 


FSTAIC 


DS 


F 


I 34 


FSTNLVL 


DS 


XL1 F*3 


I 35 


FSTPTBSZ 


DS 


XL1 F*4 


I 36 


FSTADATI 


DS 


CL6 


I 3C 




DS 


F 




FSTDSIZE 


EQO 


(*-FSTD) 



Field Description, Contents, Meaning 

Filename 

Filetype 

Date last written - mmddyy 

Time last written - hhmmss 

Hrite pointer - item number 

Read pointer - item number 

Filemode - letter and number 

Number of logical records 

First chain link pointer 

Record format (F or V) 

FST flag byte 



Extension of read/write disk 

Read/write disk 

Extension of read-only disk 

File is active (one of the following) 

File active for reading 

File active for writing 

File active from a point 

Read-only disk 



Item available 
Previous record null 
Null record 

Logical record length 

Number of 800-byte blocks 

Year last written 

Alternate file origin pointer 

Alternate number of data bloeks 

Alternate item count 

Number of pointer block levels 

Length of a pointer element 

Alternate date and time (X^ymmddhhmmss') 

Reserved for IBM use 

FST size in bytes 



Section 2. CHS Data Areas and Control Blocks 189 
Licensed Material — Property of IBM © Copyright IBM Corp. 1979 



June 29, 1979 



FSTSECT 



FSTSECT: FILE STATUS TABLE 

FSTSECT defines the file status table (FST) which describes the attributes of a file on a 
CMS virtual disk. FSTSECT is invoked by the Macro FSTB. 

The file status tables for all files on the disk are grouped into 800-byte disk records 
referred to as file status table blocks (FSTBs) . Each file status table block can 
accommodate up to 20 file status tables. 



10 



18 



20 



r~ 








FSTN 






— i 


| FSTT | 






FSTD 




I 


FSTWP 


I FSTRP 






FSTM 


I 


FSTIC 


I 


FSTCL 


| A*1 | A*2 




l_ 




FSTIL 




I 


FSTDBC 


| FSTYR 


—j 



Hexadecimal Field 
Displacement Name 



Field Description, Contents, Meaning 






FSTN 


DS 


1D 




Filename 


8 


FSTT 


DS 


1D 




Filetype 


10 


FSTD 


DS 


1F 




Date/tiie last written 


14 


FSTWP 


DS 


1H 




Write pointer (item number) 


16 


FSTRP 


DS 


1H 




Read pointer (item number) 


18 


FSTM 


DS 


1H 




Filemode 


1A 


FSTIC 


DS 


1H 




Item count 


1C 


FSTFCL 


DS 


1H 




First chain link 


1E 


FSTFV 


DS 


1C 


A*1 


Fixed (F) /variable (V) flag 


1F 


FSTFB 


DS 


1C 


A*2 


Flag byte (if used) 



B its defined in FSTFB (Applicable only to STAT EFST copy of FST -entry 
after successful S TATE or STATEW call) "" ~ 

FSTFRWX EQO X'CO' Read-only extension of read/write 

disk 
X^O* Read/write disk 

X'40 1 Read-only extension of read-only 

disk 
X'OT File is active (one of the following) 

X'04' File active for reading 

X*02* File active for writing 

I'01' File active from a designated point 

X'OO' Read-only disk 

Bits redefined for use in RDBOF 
FSTITA? ~EQ0 X^O 7 ~ ""item available 
FSTRECAV EQO X*01* Previous record null 

FSTNOIT EQO X«00» Null record 



FSTFRW 


EQU 


FSTFROX 


EQO 


FSTFACT 


EQO 


FSTFAR 


EQO 


FSTFAW 


EQO 


FSTFAP 


EQO 


FSTFRO 


EQO 



20 
24 
26 



FSTIL 

FSTDBC 

FSTYR 

FSTL 



DS 
DS 
DS 

EQO 



1F 
1H 
1H 

♦-FSTSECT 



FST Hyperblock Parameters 
FSTFWDP EQO 800 
FSTBKWD EQO 804 



Maximum item length 
800-byte data block count 
Year 

Size of FST in bytes (X'28») 



Forward pointer to next hyperblock in storage 
Backward pointer to previous hyperblock in 
storage 
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FVSECT 

FYSECT; FIXE D VARIAB LE STORAGE WORK AREA FOR CMS FILE SY STEM 

FYSECT is used »ainly by file ■ana^eaent and I/O routines- FYS contains save areas, work 
areas, and coamonly used constants. A typical use of FYS is when a reentrant I/O routine 
requires a work area or save area, since the routine cannot aodify itself, FYSECT is 
invoked by the FYS aacro. 



DISKSSEG 



38| 



REGSAY3 



78| 



RWFSTRG 



COj 



ADTFVS 



D0|- 



REGSAVO 



110| 



I F*1 I 



REGSAV1 



150| 

I 
158| 

I 
160| 

I 
1681 

I 
170| 

I 
178| 

I 
180| 

! 
188 j 

i 
190| 

I 

1981 







| F*2 


F65535 




FW4 


VFREE 


F100 


VFRET 


JSR0 


JSR1 


RWMFD 


F800 




FVSDSKA 




DSKLST 




RWCNT 


DSKAD4 


ADTADD 




DSKPTRSZ 


DSKCHAIN 




DSKLST2 




RWCHT2 
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FYSECT 



1A0 | 

I 
1A8 | 

I 
1B0| 



DSKADR2 



ADTADD2 



DSKPTRS2 



DSKCHAI2 



FINISLST 



1C8 




r 
I 


FFF | FFF | FFD | 


1D0 


SIGNAL | F*3 


| F*U | F*5 | F*6 | F*7 | F*8 | 


1D8 




FVSERASO 


| FVSERAS1 | 


1E0 




FVSERAS2 


| F7SERAS3 | 


1E8 




F7SERAS4 


I FVSERAS5 | 


1F0 




READCNT 


I //////////////////////////// I 


1F8 


FVSFSTN | 


200 


FVSFSTT | 


208 




FVSFSTDT 


| FVSFSTWP | F7SFSTRP | 


210 


FVSFSTM | FVSFSTIC | FVSFSTCL | F*9 | F*10 | 


218 




FVSFSTIL 


| FVSFSTDB | FVSFSTYR | 


220 




FVSFSTAD 


| FVSFSTAC | 


228 


FVSFSTHP | 


230 


FVSN | 


238 


FVST | 


240| 




FVSD 


I FVSWP | FVSRP | 


248| 


F?SM 


| FVSIC | FVSFCL | F*11 | F*12 | 


250| 




FVSIL 


| FVSDBC | FYSYR | 


258I 




FVSFOP 


I FVSADBC | 


260| 




FVSAIC 


| F*13 | F*14 | | 


268! 




FVSADATI 


I///////////RESERVED/////////I 


270| 






F7SDI0P | 



2E8| 



F7SPATCH 



2F0| 



PATCH AREA 
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FVSECT 



Hexadeci 


nal 


Field 






Displacement 


Ns.se 











DISK$SEG 


DS 


15F 


3C 




REGSA73 


DS 


15F 


78 




RWFSTRG 


DS 


18F 


CO 




ADTF7S 


DC 


2F»0« 



| D4 
I 110 
| 113 



114 
152 
153 
154 
158 



15C 
160 
164 
168 
16C 



170 
174 
178 
17C 

180 
180 
184 
188 



Field Description- Contents. Meaning 

For FSTLKP, FSTLKW, ACTLKP, TRKLKP, QQTRK 
For RDBUF, WRBUF, FINIS, STATE, POINT 
Resaining storage for RDBUF, WRBDF, FINIS 
ADTLKP 



Save Area for Lowest Level Routines 

"(For IxaapleT RBADMFD. RELUFDj OPDISK, TYPSRCH, and ADTLKW) 



REGSA70 
ERRCOD0 
TRKLSA7E EQD 



DS 
DC 
DC 



15F Saved R0-R15 

AL3 (00) First 3 bytes of return code 

AL1 (*-*) F*1 Error code 

REGSA70 For TRKLKP/X only when called by QQTRK/X 



REGSA71 


DS 


15F 




DC 


AL3(00) 


ERRC0D1 


DC 


AL1 (*-*) 


F65535 


DC 


F«65535* 


FW4 


DC 


pi n i 



save Area for Next- to- Lowest L evel Rout ines 

ll°.£ example, READFST, ERASE, "ALTER, and INTS7C-L0ADM0D) 

Register save area 
First 3 bytes of return code 
F*2 Error code 

= X'OOOOFFFF* 
Constant value 

Constant value 

Constant value 

Constant value 

Address of VFRET into R15 

R0 saved here for FRET calls 

R1 saved here for FRET calls 



HR4 



EQ0 



FW4+2 



7FREE 


DC 


7 (FREE) 


F100 


DC 


FM00* 


7FRET 


DC 


7 (FRET) 


JSR0 


DC 


F'0« 


JSR1 


DC 


F'O* 



PLIST to Read/Write MFD 



RWMFD 


DC 


A(*-*) 


F800 


DC 


F«800» 




DC 


A(HW4) 


F7SDSKA 


DC 


A(*-*) 


DSKLST 


DS 


OF 


DSKLOC 


DS 


A {*-*} 


RHCNT 


DC 


A (*-*) 


DSKADR 


DC 


A(*-*) 



B il§ defi ned in D SK ADR 
FHADDR EQD X»80« 



18C 


ADTADD 


DC 


A(*-*) 


190 


DSKPTRSZ 


DC 


F»0» 


194 


DSKCHAIN 


DC 


A(0) 


198 


DSKLAST2 


DC 


OF 


198 


DSKLOC2 


DC 


A(*-*) 


19C 


RHCNT2 


DC 


A(*-*) 


1A0 


DSKADR2 


DC 


A(*-*) 


1A4 


ADTADD2 


DC 


& (*-*) 


1A8 


DSKPTRS2 


DC 


F'0 1 


1AC 


DSKCHAI2 


DC 


A(0) 


1B0 


FINISLST 


DC 


CLS'FINIS 1 


1B8 




DC 


CL8'*' 


1C0 




DC 


CL8 1 *' 


1C8 




DC 


CL2«*« 



Address of MFD 
800 bytes 

Address of the active disk table 

All-purpose RDTK/WRTK PLIST 

Address of item to be read or written 

Byte count (usually 800) 

Disk address of itei to be read or written 



When in high order bit, indicates extended 
DIO PLIST (fullword disk address 
pointer size and PLIST chain pointer) 

Address of active disk table now in use 
Disk pointer size if fullword address 
PLIST chain pointer 

All purpose readtoken and/or writetoken PLIST 
Address of iten 
Byte count 

Disk address of item 
Address of active disk table 
not used in chained PLISTs) 
Disk pointer size if fullword address 
PLIST chain pointer 
PLIST to close all files 
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Hexadeci 


mal 


Field 






Displacement 


Nane 






| 1CA 






DS 


OH 


| 1CA 




FFF 


DC 


X'FFFF* 


| 1CC 




FFE 


DC 


X'FFFE' 


| 1CE 




FFD 


DC 


X'FFFD' 


{ 1D0 




SIGNAL 


DC 


H l 0« 



1D2 



1D3 



1D4 



1D5 
1D6 



1D7 
1D8 
1DC 
1E0 
1E4 

1E8 
1EC 
1F0 



1F8 



1F8 
200 
208 
20C 
20E 
210 
212 
214 
216 



Bits defined in SIGNAL 
SWTCH EQO SIGNAL*1 



0FDB0SY DC 



X'OO* 



Bits defined in OFDBDSY 



WRBIT 
OPBIT 
FNBIT 
EEBIT 
DIOBIT 



EQO 
EQO 
EQO 
EQO 
EQO 



X'80» 
X»40» 
X'20 1 
X«10» 
X'08» 



Field Description, Contents, Meaning 



Halfword constants 

Means no significant data past 215th byte 
1968-era MFD still supported on input only 
Newest signal for 2314 handling 
SIGNAL = Scratch halfword used by READMFD 
or ERASE 
= 0000, X'FFFF', X'FFFE', or X'FFFD 1 



00, FF, FE, or FD 
F*3 Nonzero means OFD is being updated 



WRBOF 

OPDISK - READMFD 

FINIS 

ERASE - ALTER - READFST 

RDTK/WRTK 



li£s for Rou tines That Do Not Opdate the Disk, but That Cannot Be 
Interrupted by a HX Cpaaand 

ABNBIT EQO X«02* DMSABN (abend recovery routine) 

ITSBIT EQO X»01« DHSITS (SVC handling routine) 

KXFLAG DC X'00' F*4 HX flag byte 



Bits defined in KXFLAG 

KXWANT EQO X»80*~ HX wanted as soon as possible 

KXWSVC EQO X«01' Hold HX until any SVC activity 

FVSFLG0 DC X'00' F*5 General coaaunication flag byte 

Disk/tape dump DMSBRD to use FVS EST 
copy to build AFT 

FLGSAVE DC X«00» F*6 For scratch use (for example, by RELOFD) 
FVSFLAG DC X'00' F*7 For general use (as needed) 



Bits defined in FVSFLAG0 
FVS0FSPC EQO X'80' 



F*8 



Mi sc el lan eo us Storage Osed by ERASE (or RENAME) 

ERSFLAG DC 

F7SERAS0 DC 

FVSERAS1 DC 

FVSERAS2 DC 

FVSERAS3 DC 



X'00 1 

F«0« 

F'O' 

F'O' 

F'O' 



F7SERAS4 DC 
F7SERAS5 DC 
READCNT DC 



F'0» 
F'O' 
F'O' 



Flag for use by ERASE or RENAME 

RO to/froa FSTLKW (for ERASE) 

R1 to ACTLKP or FSTLKW (for ERASE) 

Address of free storage used by ERASE 

Pointers for each block in file are 

being erased 
Pointer size of file being erased 
Hyperblock address of file is being erased 
Current read count (DMSBRD) 



liie Status Table (FST) Copy from STATE 

STATEFST DS 0D " Full FST of file (STATE) 



CDF FST Copy (40 bytes) 



FVSFSTN 
FYSFSTT 
FVSFSTDT DC 
F7SFSTWP DC 
FVSFSTRP DC 
F7SFSTM DC 
FYSFSTIC DC 
F7SFSTCL DC 
F7SFSTFV DC 



DC 
DC 



D«0' 

D'0« 

2H'0' 

H«0» 

H*0' 

H*0» 

H'0« 

H«0' 

C • 



F*9 



Filename 

Filetype 

Date/tiae last written 

Write pointer (itea ID) 

Read pointer (itea ID) 

Fileaode 

Number of items in file 

Disk address (first chain link) 

Fixed (F) /variable (V) indicator 
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PVSECT 



Hexadeciial 


Field 






Displaceaent 


Uame 






217 


FVSFSTFB 


DC 


X'OO* 


218 


FVSFSTIL 


DC 


F«0' 


21C 


FVSFSTDB 


DC 


H«0« 


21E 


FVSFSTYR 


DC 


2C« » 




FVS1 


EQD 


♦-STATEFST 



220 



224 



Field Description, Contents, Meaning 

F*10 Flag byte 

Length of largest item in file 
Number of data blocks 
Year last written 

Length of short FST 

Poin te rs Associate d with Both FST Versions 

FVSFSTAD DC A (0) A (active disk table for this file) 

STATERO EQO FVSFSTAD 



FVSFSTAC DC 
STATER 1 EQU 



A(0) 
FVSFSTAC 



A (real FST entry for this file) 






230 



EDF FST Copy Area (64 bytes) 
STATFST2~DS ~ 0D 



EDF format FST copy 



230 


FVSN 


DS 


1D 


238 


FVST 


DS 


1D 


240 


FVSD 


DS 


1F 


244 


FVSWP 


DS 


1H 


246 


FVSRP 


DS 


1H 


248 


FVSM 


DS 


1H 


24A 


FVSIC 


DS 


1H 


24C 


FVSFCL 


DS 


1H 


24E 


FVSFV 


DS 


1C 


24F 


FVSFB 


DS 


1C 



Fi le Status Table (File Directory) Block 

Filename 

Filetype 

Date and/or time last written 

Write pointer (item number) 

Read pointer (item number) 

Filemode 

Item count 

First chain link 
F*11 Fixed (F) and/or Variable (V) flag byte 
F*12 Flag byte (if used) 

Bits defined for FVSFB ("FSTFB") 

Note: These bit definitions apply only to STATEFST copy of FST entry after 

successful STATE or STATEW call. 

FVSFRHX EQO X'CO* Read-only extension of read/write disk 

X*80» Read-write disk 

X'40' Read-only extension of read-only disk 

X'07 1 File 4- s active and is one of the following: 

X*04 f File active for reading 

X'02 1 File active for writing 

X^OI 1 File active from a certain point 



FVSFRW EQO 

FVSFROX EQO 

FVSFACT EQO 

FVSFAR EQO 

FVSFAW EQO 

FVSFAP EQO 



Not e: These bits apply only to FSCBFLG in PLIST 
FVSITAV EQO X'40« Item available 

FVSEPL EQO X'20« Extended PLIST 

FVSRECAV EQO X*01» Previous record is null 



Maximum for item length 
Number of data blocks 
Year 



250 


FVSIL 


DS 


1F 


254 


FVSDBC 


DS 


1H 


256 


FVSYR 


DS 


1H 




FST EDF 
FVSFPO 


Extension 


258 


~DS 


1F 


25C 


FVSADBC 


DS 


1F 


260 


FVSAIC 


DS 


1F 


264 


FVSNLVL 


DS 


XL1 


265 


FVSPTRSZ 


DS 


XL1 


266 


FVSADATI 


DS 


CL6 


26C 




DS 


F 




FVSL 


EQO 


*-FVSN 



Alternate file orgin pointer 

Alternate number of data blocks 

Alternate item count 
F*13 Numbeer of pointer block levels 
F*14 Length of a pointer element 

Alternate date and/or time (X f yymmddhhmmss* ) 

Reserved for IBM use 
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F¥SECT 



Hexadecimal Field 
Displacement Name 



Field Description, Contents, Meaning 



FST Hyper bl ock Parameters 
FfSFWDP ~EQU 800 
FVSBKWD EQO 804 
FVSELMNL EQO 6 



270 


FVSDIOP 


DS 


2E8 


F?SPATCH 


DS 


2E8 




DC 


2F0 




DC 



Forward pointer to next hyperblock in storage 
Backward pointer to previous hyperblock in storai 
Length of a DIO PLIST element 
Number of DIO PLISTs in multi-element 
chained area 



(FVSELMHT*FVSELHNL)F DIO multi-element PLIST 
0D Patch area for CMS nucleus 

CL8»FVSPATCH» Eye catcher 
20F»0« Patch area 
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IHADECB 

IHADECB; DATA E7ENT CONTROL BLOCK 

IHADECB, which is invoked via the CMSCB macro, is the simulated data event control block 
used for CMS processing of OS macros and OS access methods. The IOBECBPT field in 
FCBSECT Doints to IHADECB. 





8 

10 

18 



DECSDECB 



DECDCBAD 



DECIOBPT 



DECRECPT 



| DECTYPE | DECLNGTH 



DECAREA 



DECKYADR 



Hexadecimal Field 
Displacement Name 



DECSDECB DS 
DECTYPE DS 



Bits defined in DECTYPE 
DECBRD EQO ~ X T 80» 
DECBWR EQO X^O' 



6 


DECLNGTH 


DS 


H 


8 


DECDCBAD 


DS 


A 


C 


DECAREA 


DS 


A 


10 


DECIOBPT 


DS 


A 




BDAM Extension 




14 


DECKYADR 


DS 


A 


18 


DECRECPT 


DS 


A 




Frequently Osed Equates 




DDNAM 


EQO 


FCBDSTYP 




BLK 


EQO 


XM0« 




BS 


EQO 


X^O* 




DA 


EQO 


x»20« 




FXD 


EQO 


X«80« 




IS 


EQO 


X«80» 




LOC 


EQO 


X«08» 




MOV 


EQO 


X'10» 




PS 


EQO 


X'40' 




PO 


EQO 


X'02 1 




POO 


EQO 


X»03» 




PREflOOS 


EQO 


X»80« 




QS 


EQO 


X«40« 




OND 


EQO 


X«C0» 




VAR 


EQO 


X'40' 



Field Description, Contents, Meaning 

Event control block 
Type of I/O request 



Read SF 
Write SF 

Length of key and data 

V (data control block) 

V (key and data, buffer) 
V(IOB) 



V (key) 

V (block reference field) 



Filetype = data set name 

RECFM=blocked records 

HACRF=BSAM 

DSORG=direct access 

RECFM=f ixed-length records 

DSORG=indexed sequential 

MACRF=locate node 

MACRF=move mode 

DSORG=physical sequential 

DSORG=partitioned organization 

DSORG=partitioned unmoveable 

OFLGS=previous I/O operation 

MACRF=QSAM 

RECFM=undefined format records 

RECFM=variable-length records 
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IOSECT 



IOSECT: I/O INTERRUPT SAVE AREA 

IOSECT describes the fields used by DMSITI for save registers, I/O old PSW, and other 
data when handling I/O interrupts. IOSECT is pointed to by the AIOSECT field in NOCOH. 



60 



I 



40 | 

I 

48 | 

I 

50 | 



70 | 
I 

78 | 
I 

80 | 



IOSAVE 



IONTABL 



AOSRITBL 



AOSRILST 



OLDEST 



HEXTO 



IOPSW 



IOCSW 



HOLD 



| VSTRAHGE | ////////////// I 



88 | /////////////////////////////////////////////////////// I 

I 1 



Hexadecimal Field 
Displacement Name 






IOSAVE 


DS 


16F 


40 


IONTABL 


DC 


F'0« 


44 


AOSRITBL 


DC 


A(0) 


48 




DC 


F»28' 


4C 


AUSRILST 


DC 


A(0) 


50 


OLDEST 


DS 


4F 


60 


NEXTO 


DS 


4F 


70 


IOPSW 


DS 


2F 


78 


IOCSW 


DS 


2F 


80 


HOLD 


DC 


F'O 1 


84 


VSTRAHGE 


DC 


H«0» 


86 




DC 


1H»0« 


88 




DC 


2F«0» 



Field Description, Contents, Meaning 

Register save area 

Size of user interrupt table in doublewords 

Address of user interrupt table 

Length of each entry 

Address of last entry in table 

Oldest I/O old PSW and CSW 

Next oldest I/O old PSW and CSW 

Newest I/O old PSW 

Newest CSW 

Holds entry pointer for device 

Unknown device address saved here 

Reserved for IBM use 

Reserved for IBH use 
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KEYSECT 

KEYSEC T: DISK KEY TABLE DSECT FOR BDAM SIMULATION 

KEYSECT defines the key table used in OS . simulation of BDAM files for I/O by key. 
KEYSECT is built dynamically froi CMS free storage. 



10 
18 
20 
28 
30 
38 
40 
38 



r 


KEYLNGTH | 


DATAEND | 


| KEYOP | 


| KEYNAME | 


| KEYTYPE | 




KEYMODE I //////////////I 


KEYTBLAD | 




TBLLNGTH | K*1 


| K*2 I ///////////// I 


j | KEYTBLKO | 




KEYCO0T | 


KEYTABLE | 


\ KEYXTNT1 | KEYMARK \ KEYPTR1 | ///////////// I 


i— 


KEYXTNT2 | 


KEYPTR2 | 
_ — j 



Hexadecimal 
Displacement 



Field 
Name 




4 
8 
10 
18 
20 
22 
24 
28 
2C 
2D 



KEYLNGTH DS 
DATAEND DS 
KEYOP DS 
KEYNAME DS 
KEYTYPE DS 
KEYMODE DS 
DS 
KEYTBLAD DS 
TBLLNGTH DS 
KEYFORM DS 
KEYCHNG DS 



1F 
1F 
2F 
2F 
2F 
1H 
1H 
1F 
1F 
1X 
1X 



K*1 
K*2 



Bits d efine d in KEYCHNG 
KEYEXTPL~EQU X T 20' 
KDYCHANG EQO X'01' 



2E 




DS 


1H 


30 




DS 


1F 


34 


KEYTBLNO 


DS 


1F 


38 


KEYCOONT 


DS 


1F 


3C 


KEYTABLE 


DS 


OF 


3C 


KEY EOF 


DS 


XL4«61FFFF61» 


40 


KEYXTNT1 


DS 


1H 


42 


KEYMARK 


DS 


C»KY' 


44 


KEYPTR1 


DS 


1H 


46 




DS 


1H 


48 


KEYXTNT2 


DS 


IF 


4C 


KEYPTR2 


DS 


1F 



Field Description, Contents, Meaning 

Key length 

Pointer to last data item in file 

Start of PLIST for keys file 

Filename of keys file 

Filetype of keys file 

Filemode of keys file 

Reserved for IBM use 

Address of key table 

Byte size of key table 

Format of keys file 

Indicates change in key table 



Extended PLIST flag 
Change in the key table 

Reserved for IBM use 

Number of bytes read 

Item number of key table 

Blocking factor of key table 

Start of key table (item number) 

End of file marker 

Extent area if less than or equal to 65535 

BDAM key indicator 

Pointer to keys if less than or equl to 65535 

Reserved for IBM use 

Extent area if greater than 65535 

Pointer to keys if greater than 65535 
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LABSECT 

LABSECT: TAPE LABEL INFORMATION 

LABSECT contains user-supplied tape label information used by CMS tape label processing. 






r 


LABNEXT 




| LABFCBPT 




T 


8 








LABFILE 






10 








LABFID 






20 


1 L*1 | 




LABVOLID 






28 




LABVSEQ 




| LABFSEQ 






30 




LABSENN 




| LABGENV | 


LABCRD 




38 




LABCRD 


(cont.) 


| LABEXD 




■ 


40 


i 


L*2 


I L*3 | 


L*4 | 







Hexadecimal Field 
Displacement Name 



Field Description, Contents, Meaning 






LABNEXT 


DS 


A 


Forward chain pointer 


4 


LABFCBPT 


DS 


A 


Pointer FCBSECT or zero 


8 


LABFILE 


DS 


CL8 


Name of file (DDNAME) for block 


10 


LABFID 


DS 


CL17 


File identifier 


21 


LABSEC 


DS 


CL1 L*1 


Security 


22 


LABVOLID 


DS 


CL6 


Volume serial number (volid) 


28 


LABVSEQ 


DS 


CL4 


Volume sequence number 


2C 


LABFSEQ 


DS 


CL4 


File sequence number 


30 


LABGENN 


DS 


CL4 


Generation number 


34 


LABGENV 


DS 


CL2 


Generation version 


36 


LABCRD 


DS 


CL6 


Creation date 


3C 


LABEXD 


DS 


CL6 L*2 


Expiration date 


42 


LABFLAG1 


DS 


1X L*3 


This byte had default flags 




Bits defined 


in LABFLAG1 






LABDFID 


EQ0 


X f 80» 


Default file identifier 




LABDSBC 


EQO 


X«40» 


Default security 




LABDVID 


EQO 


X»20« 


Default volume serial number 




LABDVSEQ 


EQO 


XM0* 


Default volume sequence number 




LABDFSEQ 


EQO 


X»08» 


Default file sequence number 




LABDGENN 


EQO 


X , 04» 


Default generation number 




LABDGENV 


EQO 


X'02' 


Default generation version 




LABDCRD 


EQO 


X'01» 


Default creation date 



43 LABFLAG2 EQO 1X 

Bits defined in LABFLAG2 



L*4 Miscellaneous flags byte 



LABDEXD 


EQO 


X«80« 


LABFDEF 


EQO 


X«04« 


LABPERM 


EQO 


X'02' 


LABNOCHG 


EQO 


X'01' 


LABSIZE 


EQO 


(*-LA 



Default exipiration date 
LABSECT gotten by FILEDEF 
Permanent specified 
No change specified 



(*-LABSECT*7)/8 Size of LABSECT in doublewords 
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LDBST 

LDRST: LOADER STORAGE AREA 

LDRST describes the fields of the work area used by the loader. The work area is 
obtained and built by DMSLDR. LDRST is built dynamically by DMSLDR froi CMS free 
storage. 



0| 
I 

8| 

I 

10| 

I 
181 



6PRSAV 



LOCSAV 



RETT 



LOCCT 



BRAD 



TBLREF 



201 A*1 



A*2 I 



TRT.rrT 



I 1*3 



28 | ///////////// I //////////////I ///////////// I ///////////// 

I 

301 



I 



RLDCONST 



PARMLIST 



38 



RETREG 



SPEC 



I 
358| 

I 
360| 



ESIDTB 



I 
558| 

I 
560| 



APS7 



598 



5A0| 

I 
5A8| 



5B0| 



5B8 



5C0I 



5C8 



5D0I 



5D8| 



5E0I 





i 
1 


TEMPST | 




TMPLOC | 


CRDPTR | 


FILE | 


READBOF | 


FNAME | 


FTYPE I 


FMODE 


I///////////////I 


RADD | 




RLENG | A*4 | 


A* 5 1 ////////////// | 




NUMBYTE | 


RITEM | 




RNOM | 


RWRPT | 



Licensed Material 



Section 2. CMS Data Areas and Control Blocks 198.1 
Property of IBM © Copyright IBM Corp. 1979 



June 29, 1979 



198.2 IBM VH/370 Data Areas and Control Block Logic 



Pg. of SY20-0884-3 Rev June 29, 1979 by Supp LD23-9035-0 for 5748-XE1 

LDRST 



5E8I 

i 

5F0I 



RRDPT 



FIHIS 



6 8 | A* 6 | //////////////////// 1 

I 3 



SYSUT1 (44 bytes) 



638) 



TYPLIH 



6401 



648 



TYPREAD 



DSKLIN 



I 

660| 
I 

668| 
I 

670| 
I 
I 
I 

6801 



HEXCON 



DSKAD 



, 1 

IOOTPUT | 
1 



OUTBOF 



6E0| 

I 

6E8| 

I 

6F0| 

I 
I 
I 



PRVCST 



SAV67 



ENTNASE 



6F8j 



ENTADR 



MEMBOUND 



7001 



PLISTSAV 



900| 



REG13SAV 



I A*7 | 
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LDHST 



Hexadecimal 


Field 






Displacement 


Name 









GPRSA7 


DS 


3F 


C 


LOCSAV 


DS 


F 


10 


RETT 


DS 


F 


14 


LOCCT 


DS 


F 


18 


BRAD 


DS 


F 


1C 


TBLREF 


DS 


F 


20 


FLAG1 


DS 


X 




Bits defined 


in FLAG1 




ABSOLOTlT 


EQO 


X'80 7 




FSTXTADR 


EQO 


X*40« 




COMMONEX 


EQO 


X'20 1 




PREXIST 


EQO 


X»10» 




ENDCDADR 


EQO 


x»08» 




NOERASE 


EQO 


X»04' 




HORKFILE 


EQO 


X«02» 




NODOP 


EQO 


X»01« 


21 


FLAG2 


DS 


X 




Bits defined 


in FLAG2 




STRIHITC 


EQO 


X»80» 




NOMAP 


EQO 


X'40* 




APRILB 


EQO 


X'20' 




HOAOTO 


EQO 


XM0» 




TYPE 


EQO 


x^s' 




NOREP 


EQO 


X»04» 




NOINV 


EQO 


X , 02» 




NOLIBE 


EQO 


X*01« 


22 


TBLCT 


DS 


H 


24 


FLAG3 


DS 


X 



B its defined in FLAG3 
CHD ~EQO X^O* 



Field Description, Contents, Meaning 

R9 through R12 

Base register contains A(DMSLDRA) 
Return register for DMSLSB 
(LOCCNT) next load location 
(STRTADDR) start execution address 
(ALDRTBL) top of loader table 
A*1 Loader switches (permanent) 



Absolute loading 

First text address saved 

Common entries exist in loader table 

PR entries exist in loader table 

Allow end card address 

Do not erase the load map 

Work file (SYSOT1) exists 

Do not type message DHSLI0202W 

A*2 Loader switches (permanent) 



Call STRINIT in LOADMOD 

Do not create a load map 

REP card processing control 

No automatic text deck checking 

Type load map at terminal 

No REP card printing 

No invalid card typeout 

No automatic TXT library searching 



A*3 



25 




DS 


X 




26 




DS 


5H 




30 


RLDCONST 


DS 


F 




34 


PARMLIST 


DS 


F 




38 


RETREG 


DS 


F 




3C 


SPEC 


DS 


200F 




35C 


ESIDTB 


DS 


256H 




55C 


APSV 


DS 


16F 




59C 


TEMPST 


DS 


F 




5A0 


TMPLOC 


DS 


F 




5A4 


CRDPTR 


DS 


F 




5A8 


FILE 


DS 


D 




5B0 


READBOF 


DS 


2F 




5B8 


FNAME 


DS 


2F 




5C0 


FTYPE 


DS 


2F 




5C8 


FHODE 


DS 


H 




5CA 




DS 


H 




5CC 


RADD 


DS 


F 




5D0 


RLENG 


DS 


F 




5D4 


RFIX 


DS 


C 


A* 4 


5D5 


REPL 


DS 


X 


A* 5 


5D6 




DS 


H 





Number of entries in loader table 
More flags 

Processing names from command list 

Reserved for IBM use 

Reserved for IBM use 

Relocation constant 

Opdated parameter list pointer 

Return register 

10-card input buffer 

256 BSD entries; object deck 

Register save area for subroutine calls 

Temporary RLD routine storage 

Temporary storage 

Input card pointer 

Save location for DMSLIB 

Input read parameter list 

Filename 

Filetype 

Filemode 

Reserved for IBM use 

Buffer address 

Buffer length 

Fixed/variable flag byte 

Extended PLIST flag byte 

Reserved for IBM use 
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LDEST 



Hexadecimal 


Field 






Displacement 


Naie 






5D8 


NOEBYTE 


DS 


F 


| 5DC 


RITEH 


DS 


F 


j 5E0 


RHOM 


DS 


v 


! 5E4 


RWRPT 


DS 


F 


| 5E8 


RRDPT 


DS 


F 


| 5EC 


FINIS 


DS 


7F 


I 608 


FLAGS 


DS 


X 


I 


Bits defined 
START EQO 


in FLA 
X«80« 




ONEDYNA 


EQO 


X«40» 




BSD 1ST 


EQU 


X'20« 




NOSLCADR 


EQU 


XMO' 




SETLIB 


EQD 


X'08' 




CLOSELIB 


EQO 


X s 04 ; 




LONDEF 


EQO 


X'02' 




RESET 


EQO 


X"01" 


i 609 




DS 


3X 


I 60C 


SISOT1 


DS 


11F 


| 638 


TYPLIN 


DS 


2F 


i 640 


TYPEAD 


DS 


2F 


| 648 


DSKLIH 


DS 


7F 


| 664 


DSKAD 


DS 


13X 


I 681 


HEXCON 


DS 


14X 



Bits defined in HE XCON 
PACK ~EQO HEXCON 
ONPACK EQD HEXCON+5 



I 68F 


O0TP0T 


DS 


X 


I 690 


OOTBOF 


DS 


100X 


I 6F4 


PRVCNT 


DS 


H 


I 6F8 


SA767 


DS 


2F 


I 700 


ENTNAHE 


DS 


CL8 


I 708 


ENTADR 


DS 


F 


I 70C 


HEHBOUND 


DS 


F 


I 710 


PLISTSAV 


DS 


64D 


! 910 


REG13SA? 


DS 


F 


| 914 


FRSTSDID 


DS 


X 


I 918 


ENDFREE 


DS 


OD 



Field Description. Contents. Meaning 

Number of bytes actually read 
Item number 
Number of items 
Write pointer 
Read pointer 
FINIS parameter list 
A*6 Loader switches (nonpermanent) 



Start execution requested 

One call to dynamic loading per text file 

First BSD data item this card 

No address field in SLC card 

Set up for library searching 

Clear TXTLIB searching 

Ondefined entries exist in loader table 

Reset "entry" specified 

Library search work area pointer 

RLD work file PLISTs 

TYPLIN parameter list 

TYPLIN buffer address 

Disk parameter list for load map 

Hexadecimal constant 



Hexadecimal constant 
Hexadecimal constant 



Output buffer for load map and terminal 

printing 
Address of next PR load address 
Temporary save area of R6 and R7 
Entry name (reset ENTRY or entry control 
Entry name's loader table location 
Low extend of free storage (FREELOWE) 
LOAD (INCLODE) PLIST saved 
Address of LDRST 
A*7 First section definition identification 



NEED 



EQO (ENDFREE-LDRST) /8 



No te; The following equates refer to displacements and flags in the 
REFTABLE entry usually pointed to by register 12 

Displacement of 8-byte name field 

Displacement of flag byte 1 

PR - byte alignment 

PR - halfword alignment 

PR - fullword alignment 

PR - doubleword alignment 

Ondefined symbol 

Resolve CXD 

Define common area 

Weak external reference 

LIBE card - nonobligatory 

Single bit for nonobligatory LIBE card 

Displacement of relocation factor or maximum 

address 
Displacement of absolute or assigned value 
Displacement of flag byte 2 
Command line name - must resolve 



REFNAHE 


EQO 





REFLG1 


EQO 


8 


REFPRB 


EQD 


X»7C 


REFPRH 


EQO 


X«7D« 


REFPRF 


EQO 


X^E' 


REFPRD 


EQO 


X»7F» 


REFOND 


EQD 


X«80« 


REFCXD 


EQO 


X'81* 


REFCOH 


EQD 


X'82« 


REFWEX 


EQD 


X«83» 


REFNOB 


EQD 


X*90« 


REFLIB 


EQO 


XMO' 


REFINFO 


EQO 


9 


REFYAL 


EQD 


13 


REFLG2 


EQO 


16 


REFCMD 


EQO 


X*80« 
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LIBSECT, LIBSECT 

I LIM EC T: CMS PDS HEADER 

| LIBSECT keeps track of the total library size and the address of the CHS PDS library. 



! { LIBIDENT I //////////////// I 

I I 1 

| 8 | LIBDIRSZ I LIBDIR | 

I I 1 

I 10 I /////////////////////////////////////////////////////// I 

! . ///////////////////////////////////////////////////////• 

I . /////////////////////////////////////////////////////// - 

I . /////////////////////////////////////////////////////// - 



Hexadecimal Field 

Displacement Hame Field Description, Contents, Meaning 



LIBIDENT DS CLS'LIBPDS 1 CMS PDS library identifier 

6 DS H'O 1 Reserved for IBM use only 

8 LIBDIRSZ DS F Total directory size in bytes 

C LIBDIR DS F Directory address (item number) 

10 DS XL64 Reserved for IBM use 

LIBIDSIZ EQD *-LIBSECT Length of PDS identifier 
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L0BTAB, LOBPR 

LOBTAB AND LOBPR: LOGICAL UNIT BLOCK TABLE 

LOBTAB is a device table that has a 2-byte entry for each symbolic name used by CMS/DOS. 
The simulated LDB has 255 entries: 14 entries for the system logical units and 241 
entries for programmer logical units-. System devices (SYSRDR, SYSIPT, SYSPCH, SYSLST, 
and SYSL06) can be assigned to alternate devices. The system and programmer tables are 
defined with separate DSECTs: LOBTAB and LOBPB. LOBTAB is pointed to by the LOBPT field 
in BGCOH. The address of the first LOB entry is in the first byte of the PICL control 
block. 



System (LOBTAB) 



| LOBRDR 
i 



I LOBIPT 



| LOBPCH 



| LOBLST 



8 | LOBLOG 



| //LOBLNK///// | LOBRES 



I LOBSLB 



10 I LOBRLB 
I 



I //LOBOSE/////J//LOBREC//////J LOBCLB 



18 |//LOBYIS////| LOBCAT 

L . , 



Programmer (LOBPR) 



| LOB000 
| 

8 I 



■ OB001 



I LOB002 



.0B003 



LOB004 through LOB239 



1E0 | LOB240 
i 



L0B241 



Hexadecimal Field 
Displacement Name 






System 
LOBRDR 


LOBs 
DS 


XL2 


2 


LOBIPT 


DS 


XL2 


4 


LOBPCH 


DS 


XL2 


6 


LOBLST 


DS 


XL2 


8 


LOBLOG 


DS 


XL2 


A 


LOBLNK 


DS 


XL2 


C 


LOBRES 


DS 


XL2 


E 


LOBSLB 


DS 


XL2 


10 


LOBRLB 


DS 


XL2 


12 


LOBOSE 


DS 


XL2 


14 


LOBREC 


DS 


XL2 


16 


LOBCLB 


DS 


XL2 


18 


LOBVIS 


DS 


XL2 


1A 


LOBCAT 


DS 


XL2 





Programmer LOBs 
LOBO00 DS ~ XL2 


2 


L0B001 


DS 


XL2 


4 


LOB002 


DS 


XL2 


6 
8 


L0B003 


DS 


XL2 


1E0 


LOB240 


DS 


XL2 



Field Description, Contents, Meaning 



System virtual reader 

System virtual input device 

System virtual punch 

System virtual printer 

Terminal 

Reserved for IBM use 

System residence volume 

Private source statement library 

Private relocatable library 

Reserved for IBM use 

Reserved for IBM use 

Private core image library 

Reserved for IBM use 

VSAM catalog 



Programmer logical unit block 
Programmer logical unit block 
Programmer logical unit block 
Programmer logical unit block 
LOB004 through L0B239 are defined with DS 

and XL2. Each is a programmer logical 

unit block. 
Programmer logical unit block 
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HDCOB 



NOCOH: NUCLEUS CONSTANT AREA 



NUCON is the nucleus constant area of CHS. 








IPLPSW I 


8 


IPLCCW1 | 


10 


IPLCCW2 | 


18 


EXTOPSW | 


20 


SVCOPSW j 


28 


PGMOPSW l 


30 


MCKOPSW | 


38 


IOOPSW ! 


40 


CSW | 


48 


CAW 


I//////////NUCRSY1//////////I 


50 


TIBER 


I//////////NUCRSV2//////////I 


58 


EXTNPSW | 


60 


SVCNPSH | 


68 


PGMNPSW | 


70 


HCKNPSW | 


78 


IONPSW | 


80 
88 


CPULOG | 


90 


//////////NUCRSV4///////////I HONCLASS | PERCODE | 


98 


PERADDR 


| MONCODE | 


A0 


NUCCOPYR | 


CO | 




LOWSAVE I 



160| 



FPRLOG 



1801 



GPRLOG 
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NOCON 



1C0| 




ECRLOG 




200| 




SYSTEHID ( 




220| 
I 




INSTALID 




260 | 
I 




SYSHAME 




268 1 


IPLADDR | SYSADDR 


1 


DEVICE J 


270 | //////////N0CRSV6///////////I I 

| 1 | 

278| FEIBH I 
■ ■ 


280| 
1 -■ 




CORRDATE 




2881 
1 .... 




CORRTIHE 




290| 
■ 


CORRVIRT 


1 


CORRCPUT | 


2981 
1 


L&STVIRT 


1 


LASTCPOT | 


210| 
i 




LASTCMND 




2A8| 
I _ 




PREVCMND 




2B0| 
1 




LASTEXEC 




2B8| 
1 




PRE7EXEC 




2C0| 
1 — 




LASTLMOD 




2C8| 
I 




LASTTMOD 




2D0| 
1 




DATIPCMS 




2D8| 
1 "■ 




CLKVALHD 




2E0| 

1 -™ 




MACDIRC 




300| 

I „,._ 




MACLIBL 




348| 

1 .,._ 


TXLIBSV 


1 


HACLBSV | 


350| 


TOTLIBS 


1 


TXTDIRC | 
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HUCON 



358 i 



TXTLIBS 



3A0| 

I 
3A8| 



3B0| 



GBS015 


I 


LOC0176 | 


FIRSTDHP 


1 


LASTDMP | 


FRS06 


1 


DMPTIT | 


////////////////////////////I 






DMPTITLE 





I 



440 | //////////GLBLTABL//////////I 



I 



S?C$202 



448! 



ERR$202 



I///////////// 



450| A*1 | A*2 I ////////////I 



ABATPROC 



458| 



ABATABND 



ABATLIHT 



460! 



AOSERST 



I /////////////////////////// 



I 



468 | ////////////////////////////I 

| 

470| DOSDIRC 



DOSLBSV 



490| 



DOSLIBL 



4E0| 
I 

4E8| 
I 

4F0| 
I 

4F8| 

I 
500| 

I 
508 1 

I 
510| 

I 
518| 

I 
5201 



A*3 


I A* 4 I //////////// 


ALTASATE | 


ABGCOM 


ASISCOM | 


ADOSDCSS 


SVC12SAV I 


DOSFIRST 


DOSHOH | DOSKPART | 


APPSAVE 


DOSTRANS | 


HAIHLIST 


HAINSTRT I 


FREELIST 


FREENOM I 


MAINHIGH 


FREELOWE | 


FREELOWR 


FREEOPPR | 




ANOCEHD 


ADSRAREA I 
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NOCON 



528 1 


CORRSAVE 


| CODE203 | FRERESPG | 


530| 


ADMSFRT 


| VCADTLKP | 


538 1 


VCADTHXT 


| VCADTLKW | 


540| 


CORRIOOP 


| PENDREAD | 


548 | 


PENDWRIT 


| FSTFINRD | 


550 1 


LSTFINRD 


| AINTRTBL | 


558 | 


AODTRTBL 


| NOMFINRD | NOMPNDWR | 


560| 


VMSIZE 


| ALDRTBLS I 


568 1 


STRTADDR 


| FRSTLOC | 


570| 


LASTLOC 


| LOCCNT | 


578| 


LDRADDR 


| LDRRTCD | 


580 1 




PSff | 


588 | 


LDRFLAGS 


| PRHOLD | 


590| TBEHT | A*5 


| A*6 | GET1 | 


598 | 




DSYH I 


5A0| 


JSYM 


I A*7 | | 


5A8| 




| ALIASENT | 


5B0| 


DYNAEND 


| OSMODLDW | 


588 | 


LABFIRST 


| LABNOM I ///////////// I 


5C0| 


FCBFIRST 


| FCBNOM I //////I A*8 | 


5C8| 


ATLBMODL 


| LINKLAST l 


5D0| 


LINKSTRT 


| TAXEADDR I 


5D8| 


ATSOCPPL 


| DCBSAV | 


5E0| A*9 | 


A*10 | A*11 


| A* 12 I////////////I A* 13 | A* 14 | 


5E8| A*15 | 


A*16 | A*17 


I ///////I ASYSNAMS | 


5F0| 


ACMSSEG 


| ADHSLIO | 


5F8| 


VCFSTLKP 


| VCFSTLKH | 


600 | 


AFVS 


| AOPSECT | 


608| 


ADEVTAB 


| AFSTLKP | 


610| 

i 


AGETCLK 


| AFSTLKW I 

- ■ 



208 IBM VM/370 Data Areas and Control Block Logic 

Licensed Material — Property of IBM © Copyright IBM Corp. 1979 



Pa. of SY20-0884-3 Rev June 29, 1979 by Supp LD23-9035-0 for 5748-XE1 

HUCOH 



ran 


ADMSTRKA 


ADMSTRKH 


j 


CA8 


ADMSTRKD 


| ADMSALU 






» crtrtmvcm 
n -> v~r n j. x .-> x 


i mvvenn 




CB8 


ADEVIND 


1 ATBLIND | 


CCO 


ABLKIHD 


| ALABELRD | 


CC8 


ALABELWR 


| ADHSLADN | 


CDO 


ADMSBLKR 


ADHSBLKW | 


CD8 


AABBREV 


ADEVSUP2 j 


CEO 


AESTATF 


AESTATEW | 


CE8 


AEPOINT 


ATRUNC | 


CFO 


ABAMSYS 


NDCRSVB1 | 


CF8 


N*n | RESERVED 


ACMSZER | 


D00 


SEGORELD 


ASSTATX | 


D08 


ASSTATZ 


AYSTATX | 


D10 


AYSTftTZ 


ADMSIOW | 


D18 


ADBSSECT 


ADMSABH | 


D20 


ADMSERR 


ADMSCWT | 


D28 


ADMSCWR 


ADMSIOHR | 


D30 


ADKSITI 


ADHSABN | 


D38 


AABNGO | 


ALADAD | 


D40 


ACITDB | 


ADMSITSR 




D48 


ADMSFRES | 


ASTGSB 




D40 


AINTAB | 


ADMSCAT | 


D58 


ADHSCPF | 


AEXCAB | 


D60 


NUCRS78 | 







Section 2. CHS Data Areas and Control Blocks 210.1 
Licensed Material — Property of IBM © Copyright IBM Corp. 1979 



Jane 29, 1979 



210.2 IBH VM/370 Data Areas and Control Block Logic 



Pg, of SY20-0884-3 Rev June 29, 1979 by Supp LD23-9035-0 for 5748-XE1 

NUCON 



Hexadecimal Field 



l/ldt'i.av/cacuk 


nave 







Machine 
IPLPSW 


Osage 
~DS 


8 


IPLCCWl 


D5 


10 


IPLCCW2 


DS 
ORS 





RSTNPSW 


DS 


8 


RSTOPSW 


DS 


10 


ACMSCVT 


DS 


14 


ASYSREF 


DS 


18 


EXTOPSW 


DS 


20 


SVCOPSW 


DS 


28 


PGHOPSW 


DS 


30 


MCKOPSW 


DS 


38 


IOOPSW 


DS 


40 


CSW 


DS 


48 


CAW 


DS 


4C 


N0CRS71 


DS 


50 


TIBER 


DS 


54 


N0CRSV2 


DS 


58 


EXTNPSH 


DS 


60 


SVCNPSW 


DS 


68 


PGMNPSW 


DS 


70 


MCKHPSW 


DS 


78 


IONPSW 


DS 


80 


CPULOG 


DS 



80 

90 

94 

96 

98 

9C 

AO 

CO 

160 

180 

1C0 



200 
220 
260 
268 
26A 
26C 
270 
274 
280 



N0CRS73 



ORS 
DS 



NUCRS74 DS 
MONCLASS DS 
PERCODE DS 
PERADDR DS 
HONCODE DS 
NUCCOPYR DC 
LOWSAVE DS 
FPRLOG DS 
GPRLOG DS 
ECRLOG DS 

S yste m O sag e 
SYSTEHID DS 
IHSTALID DS 
SYSNAHE DS 
IPLADDR DS 
SYSADDR DS 
DEVICE DS 
N0CRS76 DS 
FEIBM DC 
DIAGTIHE DS 



1D 

In 

tu 
1D 

IPLPSW 

1D 

1D 

1F 

1F 

1D 
1D 
1D 
1D 
1D 
1D 
1F 
1F 
1F 
1F 
1D 
1D 
1D 
1D 
1D 
48D 

CPOLOG 
2D 

1F 
1H 
1H 
1F 
1F 



Field Description^ Contents. Heaninci 



Initial program load of PSW 
Initial program load of CCW1 
Initial program load of CCW2 



PSW restart new PSW 
PSW restart old PSW 
Address of simulated OS CVT 
Address of nucleus address table 

External old PSW 
Supervisor call old PSW 
Program old PSW 
Machine-check old PSW 
Input/output old PSW 
Channel status word 
Channel address vord 
Reserved for IBM use 
Interval timer 
Reserved for IBM use 
External new PSW 
Supervisor call new PSW 
Program new PSW 
Machine-check new PSW 
Input/output new PSW 
Processor logout area 



Reserved for IBM use 

Reserved for IBM use 
Monitor call class number 
Program event recorder code 
Program event recorder address 
HONITOR CALL code 



CL32« Copyright IBM BSEPP 5748-XX8' For CMS 
XL160 Save area for first 160 bytes of storage 

4D Floating-point register logout area 

16F General-purpose register logout area 

16F Extended control register logout area 



CL32 

CL64 

CL8 

1H 

1H 

1F 

1F 



System name and date 

Installation identification 

Name of saved system loaded (via IPL) 

Address of device loaded (via IPL) 

Address of system disk 

Name of device causing last I/O interrupt 

Reserved for IBM use 



CL12*FEIBH154067' FE service number 
CL24 Buffer for DIAGNOSE timer 



280 

288 
290 
294 
298 
29C 
2A0 
2A8 
2B0 
2B8 



ORG 
CORRDATE DS 

CURRTIME DS 
C0RR7IRT DS 
CORRCPOT DS 
LASTYIRT DS 
LASTCPUT DS 
LASTCHND DC 
PREYCMND DC 
LASTEXEC DC 
PREVEXEC DC 



DIAGTIHE 

CL8 Current date - mm/dd/yy 

CL8 Current time - hh.mm.ss 

1F Current elapsed virtual time used 

1F Current elapsed processor time used 

1F Previous elapsed virtual time used 

1F Previous elapsed processor time used 

CL8* ' Last command issued 

CL8 1 ■ Next to last command 

CL8» • Last EXEC procedure 

CL8» « Next to last EXEC procedure 
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Hexadecimal 
Displacement 

2C0 
2C8 
2D0 
2D8 



2E0 
300 
348 
34C 
350 
354 
358 



3A0 
3A0 
3A4 
3A8 
3AC 
3B0 
3B4 
3B8 
3BC 
440 
444 
446 
448 
44C 
44E 



450 



451 



452 



454 
458 
45C 
460 
464 



Field 
Name 

LASTLMOD DC 
LASTTMOD DC 
DATIPCMS DC 
CLKYALMD DC 



Field Description, Contents, Meaning 

CL8* • Last module LOADHOD into main storage 

CL8* ACCESS 1 Last module LOADMOD into transient area 

D«0' Date (ma/dd/yy) at last IPL CMS 

D»0« Time (STCK form) at midnight (0000 hours) 



Macro and Text Library Pointers 

MACDIRC DC 8A (0) Address of macro library directories 

MACLIBL DC ISF'-I 1 Current macro library names 

TXLIBSV DC F'0* Library save area for TXTLIBS 

MACLBSV DC F«0« Library save area for MACLIBS 

TOTLIBS DC F'0« Total global chains (in bytes) 

TXTDIRC DC A (0) Address of TEXT library directories 

TXTLIBS DC 18F 1 -! 1 Current TEXT library naaes 



D ebug Dum|> Paramet er s 

ddmplist" 

GRS015 

L0C0176 

FIRSTDMP 

LASTDMP 

FRS06 

DMPTIT 



DMPTITLE 
GLBLTABL 

S?C$202 
ERR$202 



DS 0D DEBUG DUMP PLIST 

DC A (GPRLOG) Address of GPR save area 

DC A (LOWSAVE) Address of low storage save area 

DC A(0) Address of first location to dump 

DC A(0) Address of last location to dump 

DC A (FPRLOG) Address of FPR save area 

DC & (DMPTITLE) Address of dump title line 

DC 4X , FF« Reserved for IBM use 

DC CL132 1 « Dump title line 

DC F»0* Reserved for IBM use 

DC H'O 1 Osed for alignment 

SVC 202 Common SVC for reentrant code 

DC A(*+4) Oser will fill if necessary 

BR 14 Return to caller 

DC H'0 1 Reserved for IBM use 



Batch Monitor Inf ormation 
BATFLAGS~DC 1X 7 00 7 fi*1 

I4i§ defined in BATFLAGS 
BATRON EQO X T 80» 



Batch flags 



BATLOAD 


EQO 


X«40« 


BATNOEX 


EQO 


X'20 1 


BATRERR 


EQO 


I'10" 


BATCPEX 


EQO 


X»08» 


BATDSEX 


EQU 


X»04» 


BATMOVE 


EQO 


X'02« 


BATTER M 


EQO 


X'01» 


BATFLAG2 


DC 


1X«00» 


Bits defined 


in BATFL 


BATXLIM 


EQO 


X'80' 


BATXCPO 


EQO 


X«40« 


BATXPRT 


EQO 


X'20 1 


BATXP0N 


EQO 


XM0« 


BATDCMS 


EQO 


x^s* 


BATIPLSS 


EQO 


X*04» 


BATSTOP 


EQO 


X«02» 


BATSYSAB 


EQO 


X«01» 



Batch monitor running 

Loading batch processor 

Suppress user job execution 

Batch reader error 

CP command executing 

User job executing 

MOVEFILE executing from terminal 

User job being flushed 

A*2 More batch flags 



User job limit exceeded 
Processor time exceeded 
No. of printed lines exceeded 
No. of punched cards exceeded 
Disabled CHS command called 
Batch loading (via IPL) saved systei 
Batch stopping after current job 
System abnormal termination 
in process 



DC 



2X'00« 



Batch Processor Entry Points 



ABATPROC 
ABATABND 
ABATLIMT 
AUSERST 



DC 
DC 
DC 
DC 
DC 



A(0) 
M0) 
A(0) 
M0) 
2F»0« 



Reserved for IBM use 



Main entry 

User job abend entry 

User job limits table 

Virtual machine restart entry point 

Reserved for IBM use 
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Hexadecimal 
Displacement 



Field 



46C 
470 
490 
4D8 



4D9 
4DA 
4DC 
4E0 
4E4 
4E8 
4EC 
4F0 
4F0 
4F6 
4F8 
4FC 



DOS Library Point ers 
D0SLBSV~ DC F«0« 
DOSDIRC DC 8a (0) 
DOSLIBL DC 18F , -1» 
DOSFLAGS DC X'00» 

Bi ts defined in DOSFLAGS 
DOSMODE EQO X'80» 



Field Ds*?CriTDti rt1 f fnntonte_ Neanini 



Library save area for DOSLIBs 

» 3 3 «* _ M M *«j? t\ r\ <? 



library director: 



Current DOS library names 
A*3 DOS simulation flags 



DOSSVC 
DOSVSAM 
DOSCOMP 
DOSPIO 



EQO 
EQO 
EQO 
EQO 



VSHINSTL EQO 

DOSRC DC 
DC 
ALTASAVE DC 
ABGCOH DC 
ASYSCOM DC 
ADOSDCSS DC 
SVC12SAV DC 
DOSFIRST DC 
DOSNOM DC 
DOSKPART DS 
APPSAVE DC 
DOSTRANS DC 



DOS environment flag 

X*40' DOS SVC simulation flag 

X*20« DOS VSAH running flag 

XMO* DOS compiler running flag 

X'OS* DOS printer indicator 

X , 04 l VSAM installation flag to relocate DCSS table 

X'OO 1 A*4 DOS return code to user 

2X , 00« Reserved for IBM use 

V (LTASAVE) Address of LTA save area 

V (BGCOH) Address of partition communication region 
V(SYSCOH) Address of system communication region 
A(0) Address of DOS DCSS 

F'O* Work area for SVC 12 

A (0) Address of first DOSCB in chain 

H'O* Number of DOSCBs in chain 

H'O* Number of K-bytes in DOS partition 

V(PPSAVE) Address of problem program save area 

A(0) Address of DOS transient area 



500 
504 
508 
50C 
510 
514 
518 
51C 
520 
524 
528 
52C 
52E 

530 
534 
538 
53C 



540 
544 
548 
54C 
550 
554 
558 
55C 
55E 



Free Storage 

mainlistTdc' 
mainstrt dc 
freelist dc 
freenom dc 
mainhigh dc 
freelowe dc 
freelowr dc 
freeoppr dc 
anocend dc 
aosrarea dc 
corrsave dc 

CODE203 DC 
FRERESPG DS 

ADHSFRT DC 
VCADTLKP DS 
VCADTNXT DC 
VCADTLKW DC 

Console I/O 
CORRIOOP DC 
PENDREAD DC 
PENDWRIT DC 
FSTFINRD DC 
LSTFINRD DC 
AINTRTBL DC 
AOOTRTBL DC 
NOHFINRD DC 
NOHPNDWR DC 



Pointers 
~A(0) 
V(OSERAREA) 
V(NOCEND) 
F«1« 

V(OSERAREA) 
V (NOCEND) 
V(TRANSAR) 
A(0) 

V (NOCEND) 
V(INITSOB) 
M0) 
H f ! 
H'2* 

7(DMSFRT) 
A(DMSLAD) 
A(DHSLADN) 
A(DMSLADW) 

Pointers 
1.(0) 
A(0) 

A(CONSTACK) 
1(0) 
A(0) 
A(0) 
A(0) 
H'0» 
H«0« 



Address of first block of user free storage 
Address of the start of user free storage 
Address of first block of system storage 
Number of blocks of system storage 
High extend of user free storage 
Low extend of system free storage 
Lower limit of system free storage 
Opper limit of system free storage 
Address of end of nucleus storage area 
Address of beginning of user area 
Address of current save area 
Code number of last SVC 203 
Amount of user storage to reserve 

for CHS free storage (pages: >=2) 
DHSFRE work area 
BALR eguivalent of ADTLKP 
BALR eguivalent of ADTNXT 
BALR eguivalent of ADTLKW 



Address of current I/O buffer 
Address of pending read operation 
Address of pending write operation 
Address of finished read buffer 
Address of last finished read buffer 
Address of user input translate table 
Address of user output translate table 
Number of finished read buffers 
Number of pending write operations 
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Hexadecimal 


Field 






Displacement 


Name 








Loader Information 


560 


7MSIZE 


DS 


1F 


564 


ALDRTBLS 


DC 


1F»0» 


568 


STRTADDR 


DC 


1F»0» 


56C 


FRSTLOC 


DC 


1F«0» 


570 


LASTLOC 


DC 


1F«0» 


574 


LOCCNT 


DC 


1F«0* 


578 


LDRADDR 


DC 


IF'O* 


57C 


LDRRTCD 


DC 


1F»0' 


580 


PSW 


DC 


1D»0» 


588 


LDRFLAGS 


DC 


1F«0* 


58C 


PRHOLD 


DC 


1F«0« 


590 


TBENT 


DC 


H'0» 


592 


ONRES 


DC 


X»00» A*5 


593 


MODFLGS 


DC 


1X'00« A*6 




Bits defined 


in MODFLGS 




nomapflg" 


EQO 


X«80« 




CLEAROP 


EQO 


X«40» 




MODGNDOS 


EQO 


X»20» 




MODGNALL 


EQU 


X'10» 




SYSLOAD 


EQO 


X'08» 




MDPCALL 


EQO 


X'04» 




MOD6 


EQO 


X«02' 




MOD7 


EQO 


X'OV 


594 


GET1 


DC 


1F«0« 


598 


DSYH 


DC 


2F'0« 


5A0 


JSYM 


DC 


F«0« 


5A4 


HXTSYH 


DC 


C«Z« A*7 


5A5 




DC 


XL7«0» 


5AC 


ALIASENT 


DC 


lF f 0» 


5B0 


DY8AEND 


DC 


IF'O* 


5B4 




DS 


1F 


5B8 


LABFIRST 


DC 


A(0) 


5BC 


LABNOM 


DC 


H(0) 


5C0 


OS Simulation 
FCBTAB DS 


i Pointers 
OD 


5C0 


FCBFIRST 


DC 


A(0) 


5C4 


FCBMOM 


DC 


H'O 1 


5C6 




DC 


X'OO 1 


5C7 


OSSFLAGS 


DC 


X'OO 1 A*8 




Bits def: 


Lned 


in OSSFLAGS 




cohpsit"" 


"eqo 


X'80 1 




OSSHNO 


EQO 


X'40 1 




OSRESET 


EQO 


X'20« 




OSWAIT 


EQO 


XM0» 




DYLD 


EQO 


X«08' 




DYLIBO 


EQO 


X»04 f 




DYLIBNOW 


EQO 


X»02« 




DYMBRNM 


EQO 


X'01 f 


5C8 


ATLBMODL 


DC 


MO) 


5CC 


LINKLAST 


DC 


A(0) 


5D0 


LINKSTRT 


DC 


A(0) 


5D4 


TAXEADDR 


DC 


A(0) 


5D8 


ATSOCPPL 


DC 


7(CPP) 


5DC 


DCBSAV 


DC 


IF'O 1 



Field Description, Contents, Meaning 



Virtual storage size 

Address of loader tables 

Module starting address 

Module beginning address 

Module ending address 

Loader location counter 

Loader return address 

Loader return code 

Oser , s starting PSW 

Loader flags 

Pseudo register counter 

Initialize table entries to zeros 

Onresolved reference bit for CMS loader 

Flags 



NOMAP flag 

CLEAR option flag 

Module generated with DOS option 

Module generated with ALL option 

Allow load greater than FREELOWE or less 

than transient 
Indicate module called by DHSMDP 
Reserved for IBM use 
Reserved for IBM use 

DMSLSY R1 save location 

DMSLSY work space 

DMSLSY unique identifier base 

First character of unigue identifier 

Rest of unique identifier 

Alias entry point (dynamic load) 

Maximum load location (dynamic load) 

Reserved for IBM use 

Address of first LABSECT 

Number of LABSECT 



FCB chain address 
Address of first FCB 
Number of FCBs in chain 
Reserved for IBM use 
OS simulation flags 



Compiler switch 

DMSSMN unconditional flag 

Reset for OS 

Hait for OS 

Dynamic loading in process 

Omit dynamic library scan 

Dynamic library scan 

Linked via member name 

Address of tape label processor 
Address of last OS linkage block 
Address of entry point of last module 
Terminal attention exit element address 
Address of TMP PLIST for TSO programs 
DCB restoration address 
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MUCON 



Hexadecimal 
Displacement 

68C 
690 
694 
698 
69C 
6A0 
6A4 
6A8 
6AC 
6AE 
6B0 
6B4 
6B8 
6BC 
6C0 
6C4 
6C8 
6CC 
6D0 
6D4 
6D8 
6DC 
6E0 
6E4 
6E8 
6EC 
6F0 
6F4 
6F8 
6FC 



700 
700 
708 
710 
714 
715 
716 
7A0 
7A0 
840 
840 
848 
A60 
A60 



BAO 
BEO 
C20 



Field 






Name 






ASCANO 


DC 


7 (DMSSCNQ) 


AEXEC 


DC 


V (DMSEXC) 


ASTART 


DC 


V(DMSLDRA) 


AADTLKW 


DC 


7 (ADTLKW) 


AOSABRV 


DC 


7<USABR7J 


AEXTSECT 


DC 


7(EXTSECT) 


ASCBPTR 


DC 


7 (SCBPTR) 


ADMSROS 


DC 


A(0) 


LDMSROS 


DC 


H«0« 


CDMSROS 


DC 


H»0« 


AACTLKP 


DC 


7(DHSLAF) 


AACTNXT 


DC 


7 (DHSLAFNX) 


AACTFREE 


DC 


7 (DHSLAFFE) 


AACTFRET 


DC 


7(DMSLAFFT) 


AADTNXT 


DC 


7 (ADTHXT) 


ATRKLKP 


DC 


7(DMSTRK) 


ATRKLKPX 


DC 


7(DHSTRKX) 


AQQTRK 


DC 


7 (DHSTQQ) 


AQQTRKX 


DC 


7 (DMSTQQX) 


AERASE 


DC 


7(DMSERS) 


ATYPSRCH 


DC 


7(TYPSRCH) 


AUPDISK 


DC 


7(DMSA0D) 


AKILLEX 


DC 


7(KILLEX) 


ATFINIS 


DC 


7(DHSFNST) 


ARDBOF 


DC 


7(DMSBRD) 


AWRBUF 


DC 


7(DMSBWR) 


AFINIS 


DC 


7(DflSFHS) 


ASTATE 


DC 


7(DMSSTTE) 


ASTATEW 


DC 


7(DMSSTTW) 


APOINT 


DC 


7 (POINT) 


Terminal 


Buffers 




DS 


OD 


CONCCWS 


CCH 


0,0 # X , 60',0 




CCH 


3,0,1*20* ,1 


COHIHBLK 


DC 


A(0) 




DC 


XL1«0A» 




DC 


AL1 (134) 


CONINBOF 


DS 


CL134 




DS 


OD 


CMNDLIHE 


DS 


CL160 




DS 


OD 




DC 


CL8«EXEC« 


CMNDLIST 


DS 


CL536 




DS 


OD 


COHSTACK 


DS 


CL320 


Save Areas 




FREESA7E 


DS 


16F 


BALRSA7E 


DS 


16F 


WAITSA7E 


DS 


16F 



Field Description, Contents, Meaning 



Console read and write CCW 
HOP to get CE and DE together 



C60 



7SAM and AHSER7 Control Words 
DS OD 

Percent of Available Oser Storage To Reser ve for 
GET7IS/FREE7IS Ose When Running 7SAM 

50 percent for CHS/7SAM use 
Reserved for IBH use 
Reserved for IBM use 



C60 


PCTVSAM 


DC 


H'50' 


C62 




DS 


1H 


C64 




DS 


1F 
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Hexadecimal 


Field 






Displacement 


Name 








Beginning and 


End of IKQLfl 


C68 


ADIKQLAB 


DC 


A(X'FFFFFF« 


C6C 


HDIKQLAB 


DC 


A(0) 


C70 


ARORTBL 


DC 


V(RORTBL) 


C74 


ADMS7IB 


DC 


7(DHS7IB) 


C78 


A7IPW0RK 


DC 


A(0) 


C7C 


7SAMFLG1 


DC 


x»oo» a 




Bits defined 


in VSAHFLG1 




7SAHR0H 


EQO 


X'80» 




7SJ0BCAT 


EQO 


X»40« 




7IPINIT 


EQO 


X'20» 




7SAHSER7 


EQU 


X'10» 




VIPSOP 


EQO 


X«08» 




VIPTCLOS 


EQO 


x'ov 




VSAMSOS 


EQO 


X«02» 


C7D 




DS 


3X 


C80 


AVSAMSYS 


DC 


A(0) 


C84 


AAHSSYS 


DC 


A(0) 


C88 


A7SRE0J 


DC 


7($$BEOJ4) 


C8C 


A7SRWORK 


DC 


A(0) 


C90 


ACBLIST 


DC 


A(0) 


C94 




DS 


3F 


I CAO 


ADHSTRKA 


DC 


7(DHSTRKAL) 


I CA4 


ADHSTRKH 


DC 


V(DMSTRKMA) 


I CA8 


ADHSTRKD 


DC 


7(DMSTRKDE) 


I CAC 


ADHSALO 


DS 


7(DHSAL0) 


I CBO 


ASORTFST 


DC 


7(S0RTFST) 


I C84 


ADE7SOP 


DC 


7(DMSDI00S) 


I CB8 


ADE7IND 


DC 


7(DHSDI0DI) 


I CBC 


ATBLIHD 


DC 


7(DMSDI0TI) 


I CCO 


ABLKIND 


DC 


7(DMSDI0BI) 


| CC4 


ALABELRD 


DS 


7(DMSDI0LR) 


I CC8 


ALABELWR 


DS 


7(DMSDIOLW) 


| CCC 


ADHSLADN 


DC 


7(DHSLADNH) 


I CDO 


ADHSBLKR 


DC 


7(DHSEBLKR) 


| CD4 


ADHSBLKW 


DC 


7 (DMSEBLKW) 


I CD8 


AABBREV 


DC 


7(ABBRE7) 


I CDC 


ADE7S0P2 


DC 


7 (DMSDIOFB) 


I CEO 


AESTATE 


DC 


7(DMSSTTN) 


| CE4 


AESTATEff 


DC 


7(DMSSTTNW) 


I CE8 


AEPOINT 


DC 


7 (DMSPUTE) 


I CEC 


ATRONC 


DC 


7(DMSERSTR) 


| CFO 


ABAMSYS 


DC 


F«0« 


| CF4 


N0CRS7B1 


DS 


F 


| CF8 


BAHFLAGS 


DC 


X«00« 




Bits defined 


in BAHFLAGS 




DOSBAH 


EQO 


X»80» 


I CF9 


H0CRS7B2 


DS 


XL3 


I CFC 


ACHSZER 


DC 


A(0) 


I D00 


SEGORELO 


DC 


A(0) 


I D04 


ASSTATX 


DC 


A(0) 


I D08 


ASSTATZ 


DC 


A(0) 


I DOC 


AYSTATX 


DC 


A(0) 


I D10 


AYSTATZ 


DC 


A(0) 


j D14 


ADHSIOW 


DC 


7(DMSI0W) 


| D18 


ADBGSECT 


DC 


7 (DBGSECT) 


| D1C 


ADHSABW 


DC 


7(DHSABW) 


I D20 


ADHSERR 


DC 


7(DHSERR) 


I D24 


ADHSCffT 


DC 


7(DMSCWT) 



Field Description, Contents, Meaning 



Set to A (IKQLAB) when it is in storage 
Set to end of IKQLAB when in storage 
7SAH resource table address 
Address of 7SAM interface bootstrap 
Address of DMS7IP work area 



A* 18 7SAM information flag 



7SAM system loaded 

7SAM job catalog active 

DMS7IP has been initialized 

CHSAMS system loaded (AMSER7 running) 

OS interface S7C 2 call 

OS TCLOSE call 

OS AMSER7 running 

Reserved for IBH use 

Address of VSAH saved system 

Address of CHSAHS saved system 

DHSVSR entry point from 7SAH $$BACLOS 

Address of DMS7SR work area 

ACB list built by OPEN/CLOSE 

Reserved for IBH use 

Enhanced disk format disk block allocate 

Enhanced disk format disk block malfunction 

Enhanced disk format disk block de-allocation 

Address of release subroutine 

Address of sort FST subroutine 

CP-to-OS device type conversion table 

Device constants table index 

Device constants table 

Device block size index 

Address of label read routine 

Address of label write routine 

Location and/or address reguested 

from the active device table 
Enhanced disk format block read routine 
Enhanced disk format block write routine 
Abbreviation resolver in DHSIHA 
Device support table for FB-512 
Extended PLIST state 
Extended PLIST state for read/write 
Extended PLIST pointer 
File truncating function 
Pointer to CHSBAM DCSS 
Reserved for IBM use 
CHSBAM shared segment flag bytes 



FB-512 support available 

Reserved for IBM use 

Address of CMSZER segment 

Relocation factor for segment zero 

Address of shared copy of SSTAT 

Address of dummy second SSTAT for hyperblock 

Address of shared copy of YSTAT 

Address of dummy second YSTAT for hyperblock 

DHSIOW 

Debugging work area 

Abend work area 

DMSERR 

DMSCWT 
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SuCON 



Hexadecimal 


Field 








Displacement 


Haae 






Field Description, Contents, Meaning 


t B28 


ADHSCWR 


PC 


7(DHSCWR) 


DHSCWR 


| D2C 


ADHSIOWR 


DC 


7 (DHSIOWR) 


DHSIOWR 


| D30 


ADHSITI 


DC 


7CDHSITI) 


DHSITI 


| D34 


ADHSABH 


DC 


7 (DHSABH) 


DHSABN 


| D38 


AABNGQ 


DC 


7(DHSABNG0) 


DBSABNGO 


| D3C 


ALADAD 


DC 


7(DHSLADAD) 


DHSLADAD 


| D40 


ACITDB 


DC 


7(DHSCITDB) 


DHSCITDB 


| D44 


ADHSITSR 


DC 


7(DHSITSR) 


DHSITSR 


| D48 


ADMSFRES 


DC 


7(DHSFRES) 


DHSFRES 


| D4C 


ASTGSB 


DC 


7(DHSSTGSB) 


DHSSTGSB 


| D50 


AIHTAB 


DC 


7(DMSIHTAB) 


DHSIHTAB 


I D54 


ADHSCAT 


DC 


7 (DHSCAT) 


DHSCAT 


| D58 


ADMSCPF 


DC 


7 (DHSCPF) 


DHSCPF 


| D5C 


AEXCAB 


DC 


7(DHSEXCAP) 


Address of EXEC for abend routine 


j D60 








Bss@r?9i for XBH us© 


| D68 




DS 


OD 


Align end of HUCOH 
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OPSECT 

OPSECT; HAJOR CSECT FOR ALL I/O OPERATION LISTS 

OPSECT describes the fields used by several programs as parameter lists for reading and 
writing on disks and other devices* The OPSECT CSECT is pointed to by the AOPSECT field 
in N0CON. 






r " 


CHSOP 


■ 


8 


| FILENAME | 


10 


| FILETYPE | 


18 


| FILEMODE !/////////////! 


FILEBDFF | 


20 


| FILEBYTE 


| FILEFORM I ////////////// I 


28 


| FILEREAD 


I 


FILEITEH | 


30 


| FILECOOT 


I 


FILEHPTR | 


38 


| FILERPTR 


I 


SAVER 14 | 


40 


SAVER15 


I 


SAVER0 \ 


48 


| SAVER1 


I 


CHSNAHE | 


50 


CHSNAHE (cont.) 


I 


CONREAD | 


58 


CONREAD (cont.) 


I 


CONRDBDF | 


60 


CONRDCOD | CONRDCNT | /////////RESERVED//////////! 


68 


WAITLIST | 


70 


CONWRITE | 


78 


CONWRBDF 


| A*1 


| CONWRCNT | 


80 


WAITLST | 


88 


WAITDEV | ! 


90 


| READLST | 


98 


READLST (cont.) 


I 


RDBDFF | 


A0 


RDCCW | RDCOUNT 


I 


PUNCHLST | 


A8 


PONCHLST (cont.) 


I 


PDNBOFF I 


B0 


PUNCOONT 


I 


PRINTLST | 


B8 


PRINTLST (cont.) 


I 


PRBUF | 


CO 


PRCNT 


I 


TAPELIST | 


C8 


TAPELIST (cont.) 


! 


TAPEOPER | 


DO 


TAPEOPER (cont.) 


I 


TAPEDEV | 


D8! 
i 


A*2 | TAPEBUFF 

i 


I 


TAPESIZE | 

i 
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OPSECT 



E0| 



TAPECOOT 



CLOSIO 



E8 



F0| 



CLOSIO (cont.) 



CLOSIODY 



CLOSIODV (cont.) 



I 



F8 | ////////////////////////////I ///////////////////////////. 
- ////////////////////////////I ///////////////////////////- 
- ////////////////////////////I ///////////////////////////■ 
- ////////////////////////////I ///////////////////////////. 



I 
128| 



EXLEVEL 



EXF1 



1301 



EXHOH 



EXADD 



138| ////////////////////////////I /////////////////////////// 



1401 



FCBIO 



I A*3 | 

1 



Hexadecimal 


Field 






Displacement 


Name 








Main 1^0 
PLIST 


Oper 


ation 





DS 


OD 





CHSOP 


DS 


CL8 


8 


FILENAME 


DS 


CL8 


10 


FILETYPE 


DS 


CL8 


18 


FILEMODE 


DS 


CL2 


1A 




DS 


H 


1C 


FILEBOFF 


DS 


F 


20 


FILEBYTE 


DS 


F 


24 


FILEFORM 


DS 


CL2 


26 




DS 


H 


28 


FILEREAD 


DS 


F 


2C 


FILEITEM 


DS 


F 


30 


FILECOOT 


DS 


F 


34 


FILEWPTR 


DS 


F 


38 


FILERPTR 


DS 


F 



3C 
40 
44 
48 

4C 



POINTERS EQO FILEITEM 

AFST EQO FILEBOFF 

IOAREA EQO FILEBOFF 

IOLENGTH EQO FILEBYTE 

Immediate Register Save Area 

SAYER14" DC F«0» 

SAVER15 DC F^ 1 

SAVERO DC F'O 1 

SAVER1 DC F'0» 



CHSNAME DC 



CLS^FILE' 



Field Description, Contents, Meaning 



I/O operation command word 

Filename 

Filetype 

Filemode 

Reserved for IBM use 

Input/output buffer 

Data count 

File format: fixed/variable records 

Reserved for IBM use 

Read data count 

Item number 

Number of items 

Write pointer 

Read pointer 



Buffer area location 
Buffer length 



Temporary R14 save 
Temporary R15 save 
Temporary RO save 
Temporary R1 save 

Default filename 



54 



C on sole Pa ra meter Lists 

~DS " OF 



54 


Read Console 
C0NREAD ~DC 


CLS'HAITRD 1 


5C 
60 


C0NRDB0F DC 
CONRDCOD DC 


V (CMNDLINE) 
C'0» 


61 


DC 


X'0» 


62 
64 


CONRDCNT DC 
DC 


AL2 (0) 
F«0» 


68 


Console Wait 
WAITLIST~DS 


List 
OF 


68 


DC 


CLS'CONHAIT 1 



Terminal read 

Address of input buffer 

Translate code 

Data byte count 
Reserved for IBM use 
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OPSECT 



Field 



Field Description^ Contents- Meaninci 



70 
78 
7C 
7D 
7E 



80 
80 
88 
8C 
90 



Write Console 
COHWRITE DS 

DC 
CONWRBOF DC 
C0NWRCOD DC 

DC 
CONWRCNT DC 



i/r 

CLS'TTPLIN' 

A(0) 

C'B 1 A*1 

X'00« 

AL2 (0) 



Wait Parameter List 



WAITLST 



WAITDE? 



DS 
DC 
DC 
DC 
DC 



OF 

CLS'WAIT* 

CL4»C0N1* 

F'0* 

F'0« 



Location of message text 
Color code 

Length of message text 



Address of DMSCWT 

Symbolic address of console 



Reader Parameter List 



94 
94 
9C 
A0 
A2 



A4 
A4 
AC 
B0 



B4 
B4 
BC 
CO 



C4 
C4 
CC 
D4 
D8 
D9 
DC 
E0 



E4 
E4 
EC 
F4 
F8 



DS 
READLST DC 
RDBOFF DC 
RDCCW DC 
RDCO0HT DC 



OF 

CLS'CARDRD' 

A(0) 

H«0« 

H«0« 



Card Punch Paramet er L is t 
PONCHLST DS OF 

DC CL8«CARDPH» 
PONBOFF DC A (0) 
POHCOONT DC A(0) 

Printer Parameter List 
prihtlst""ds OF 

DC CL8«PRINTR« 
PRBOF DC A (0) 
PRCHT DC A(0) 

Tape Parameter List 



TAPELIST DS 
DC 
TAPEOPER DC 
TAPEDE? DC 
TAPEMASK DC 
TAPEBOFF DC 
TAPESIZE DC 
TAPECOOT DC 



OF 

CL8«TAPEIO» 
CL8« • 
CL4 ! TAPV 
X«00 f A*2 

AL3 (0) 

F«0» 



Buffer address 
CCW byte count 
Bytes actually read 



Punch buffer address 
Punch CCW count 



Printer buffer address 
Printer data count 



Tape operation command 
Tape symbolic device 
Set mode 
Buffer location 

Tape counter 



Close Out Device Dep en dent Data Set on Onit Rec o r d Equipment 



CLOSIO DS 
DC 

CLOSIODV DC 
DC 
DC 



OF 

CL8 

CL8 

4X«FF« 

6D«0» 



CLOSIO' 
t 



Operation 
Device type 

Reserved for IBM use 



128 
12C 
130 
134 
138 



140 
144 



Storage for EXEC Bo otstr ap 
EXLEVEL DC ""f'O 7 
EXF1 DC FM» 

EXHDH DC F»0' 
EXADD DC F'0 1 
DC 2F'0» 



EXEC level 

Follows EXEC level 

Number of doublewords of free storage 

Address of EXECTOR in storage 

Reserved for IBH use 



Storage for OS Hacr o Simulati on Routines 

FCBIO DC A(0) "Address of last FCB used during I/O 

OSIOTTPE DC X«DD f A*3 OS access method type 
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OSFST 



OSFST: OS FILE STATUS TABLE 

OSFST describes the fields of an OS file status table. When an OS disk is accessed, 
DMSROS obtains storage from CMS free storage, builds and fills in an OSFST block, which 
is comparable to a CMS FST block. This block is released by DMS1L0. 



8 
10 
18 
20 



OSFSTFM I ///////////I OSFSTBLK | OSFSTFVF | 


OSFSTLRL | A*1 


I ///////I A*2 | A*3 | 


OSFSTNXT | 


OSFSTCHR | 


| OSFSTEND 


I I 
—j 1 







OSFSTDSN 



48 



50 



OSFSTXTH 



F0 

F8 

100 

108 

110 



| OSFSTDSK | OSFSTTTP 



OSFSTNTE 



I //////////////////// 



OSFSTTRK 



I /////////////////////////// 



///////////////////////////I 



OSFSTMEM 



OSFSTMEM (cont.) 



I /////////////////////////// I 

1 



Hexadecinal Field 
Displacement Name 






OSFSTFM DS 


1H 




2 


DS 


1H 




4 


OSFSTBLK DS 


1H 




6 


OSFSTFVF DS 


1H 




8 


OSFSTLRL DS 


1F 




C 


OSFSTRFM DS 


1X 


A*1 


D 


DS 


1X 




E 


OSFSTFLG DS 


1X 


A*2 




Bits defined 


in OSFSTFLG 






OSFSTALT EQO 


X»80 f 






OSFSTDBK EQO 


X»40» 






OSFSTMYL EQO 


X«08» 






OSFSTOMV EQO 


X»02* 






OSFSTRSW EQO 


X»01» 




F 


OSFSTXHO DS 


1X 


A*3 


10 


OSFSTNXT DS 


1F 




m 


OSFSTCHR DS 


5X 





Field Description, Contents, Meaning 

Disk mode 

Reserved for IBM use 
Block size 
Fixed/variable flag 
Logical record size 
OS record foraat 
Reserved for IBM use 
Flag byte 



Alternate track indicator 
Block size not specified in DSCE 
Multiple voluae data set 
Onaoveable data set 
Indicates point+1 just issued 

Nuiber of data extents on disk 

Hext OS FST 

CCHHR of last I/O operation 
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PDSSECT 

PDSSECT; DIRECTORY TABLE FOR BP AH SIHOLATIOH 

PDSSECT describes the fields of the in-storage directory that is used in OS simulation of 
BPAH. The in-storage directory is built dynamically by DHSSVT from CMS free storage. 



PDSIDENT 



I P*1 | P*2 



PDSDIRSZ 



PDSDIRIT 



10 



18 



20 



28 



PDSENTSZ 



DIRNAHE 



DIRNAHE (cont.) I DIRPTR | P*3 | P*4 | CORESIZE 



PDSBLKSI | P*5 I////////////////////////////////// 



PDSDIR 



Hexadecimal Field 
Displacement Name 



10 

1A 
1C 

1D 
1E 
20 
22 



28 



PDSIDEHT DS 



C»LIBPDS« 



IlaSL byte at PDSIDENT+3 
PDSFHEW EQO C f P T 

PDSFLG1 DS X 

Bits de fined in PDSF LS1 
PDSTEHPF EQO C'S 1 



PDSFLG2 


DS 


X 


PDSDIRSZ 


DS 


F 


PDSDIRIT 


DS 


F 


PDSHDRSZ 


EQO 


♦-PDSIDENT 


PDSENTSZ 


DS 


F 


DIRNAHE 


DS 


3H 


DIRPTR 


DS 


1H 


TEMPBYTE 


DS 


1X 


NEWBLOKS 


DS 


1X 


CORESIZE 


DS 


1H 


PDSBLKSI 


DS 


1H 




DS 


6X 


PDSLEN 


EQO 


♦-PDSSECT 


PDSDIR 


DS 


OF 



Field Description, Contents, Heaning 
HACLIB/PDS identifier 

Character 'P 1 indicates old format PDS 
P^1 IMACLIB/PDS first flag byte 

PDS directory is in $PDSTEHP file 

P+2 HACLIB/PDS second flag byte 
HACLIB/PDS directory size 
HACLIB/PDS directory item number 

Size of HACLIB/PDS header 

PDS entry size 

HACLIB identifier 

Item pointer to start of directory 
P^3 If this is a dollar sign ($) , PDS 

is in the $PDSTEHP file 
P+4 Number of new blocks added to PDS by STOW 

Size of dictionary in bytes 

Block size of dictionary 
P^5 Reserved for IBH use 

Length of the PDSSECT header 

Start of in-storage dictionary 
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PGMSECT 



PGMSECT: PROGRAM IN TERR OPT WORK AREA 

PGMSECT describes the fields used by DMSITP for saving registers, old PSW, and other data 
for handling program interrupts. 

The PGMSECT CSECT is pointed to by the APGHSECT field in NOCON. 




8 
10 
18 
28 
30 
38 
40 



I 


DEBPSW 


I /////////////////////////// I 




PICADDR 


| OPSH | 




OPSW (cont.) 


I I 

■ i 


I Registers I 


I TEMPOLD | 


| TEMPNEW | 




R13AREA 


1 1 
- — J 1 






PSAVE | 



78 



80 



88 



90 





r 
1 


SCBPTR | 


SCBWORK 


1 


SCBSAV12 | 


SCBSAV13 


1 


SCBSAV14 | 



ADPIE 



Hexadecimal Field 
Displacement Name 




4 
8 
8 
C 
14 



28 
30 
38 
3C 
7C 



Field Description, Contents, Meaning 



Storage for Program Interrupt Routine (DMSITP) 



DEBPSW 


DC 


F«0»,V(DMSDBG) 




DC 


1F 


PIE 


DS 


0D 


PICADDR 


DC 


F»0» 


OPSW 


DC 


2F'0« 




DC 


5F'0» 


*EPIE 






TEMPOLD 


DC 


8X f 00» 


TEMPNEW 


DC 


8X'00» 


R13AREA 


DC 


F'O 1 


PSAVE 


DC 


16F«0» 


SCBPTR 


DC 


F«0» 



Point to debug 

Reserved for IBM use 

Program interrupt element 

PICA address from recent SPIE 

Old PSW after program interrupt 

Registers are: R14, R15, R0, R1, and R2 

End program interrupt element 

Work area 

Work area 

Saved R13 

Registers saved at interrupt time 

Pointer to first STAE control block 



Bits defined in SCBPTR 
STAEBIT" EQO X»80 7 
STAIBIT EQO X»40» 
RETRYBIT EQO X«20 f 



80 


SCBWORK 


DC 


M0) 


84 


SCBSAV12 


DC 


M0) 


88 


SCBSAV13 


DC 


M0) 


8C 


SCBSA?14 


DC 


M0) 


90 


AOPIE 


DS 


A 



Address of work area for STAE exit routine 
Address of R12 save area for DHSSAB 
Address of R13 save area for DHSSAB 
Address of R14 save area for DMSSAB 
Address of user f s PIE, in SPIE exit 
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PUBADR 



PUBADR: PHYSICAL ONIT BLOCK TABLE 

PDBADR defines the fields of a physical unit block table as used by CHS and/or DOS 
routines. Both DSECTs define the same storage. 

• For Use by CMS Routines (HAPPUB macro) 

The simulated PUBADR DSECT has eighteen 8-byte entries, one for each device supported by 
CHS. The simulated PDBADR DSECT is invoked by the HAPPDB macro. 



| PUBCUU 
i 



| ////// I A*1 | A*2 | A*3 | A*4 | A*5 | 



Hexadecimal Field 
Displacement Name 






PUBCUU DS 


XL2 




2 


DS 


X 




3 


PUBDSKM DS 


X 


A*1 


H 


PUBDETT DS 


X 


A*2 


5 


P0BTAPH1 DS 


X 


A*3 


6 


PUBTAPM2 DS 


X 


A*«* 


7 


P0BTAP7 DS 


X 


A*5 



Field Description, Contents, Heaning 

Channel and device number 

Reserved for IBH use 

Disk mode if assigned DASD 

Device type code 

CHS tape set mode attributes 

DOS tape set mode attributes 

7-track indicator 



• For Use by DOS/VS Routines (PUBTAB macro) 

The PUBADR DSECT is invoked by the PUBTAB macro. The address of PUBTAB is at 
displacement X^O 1 of BGCOM. 



I PUBCHANN !/A*1//! A*2 I A*3 I A*4 I A*5 I A*6 I 



I A*7 | 
i — — 1 



Hexadecimal Field 
Displacement Name 






PUBCHANN 


DS 


XL2 




2 


PUBCHQPT 


DS 


X 


A*1 


3 


PUBERR 


DS 


X 


A*2 


4 


PUBDEVTY 


DS 


X 


A* 3 


5 


PUBOPTN 


DS 


X 


A* 4 


6 


PUBCSFLG 


DS 


X 


A*5 


7 


PUBJCFLG 


DS 


X 


A* 6 


8 


NEXTPUB 


DS 


X 


A*7 




PUB WIT 


EQU 


*-PUBADR 






PUBPTR 


EQU 


NEXTPUB 





Field Description, Contents, Heaning 

Channel and device number 

Reserved for IBH use 

Error retry counter or TEB point 

Device type code 

Set mode command or other options 

Channel scheduler flags 

Job control flags 

First byte of next PUB entry 

Length of PUB table 
Pointer to original PUB 
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PUBOWNER 

PUBOWNER: PHYSICAL ON IT BLOCK OWNERSHIP TABLE 

I PUBOWNER contains a 2-byte entry for each entry in the PUB table. For CMS/DOS, there are 
| 34 two-byte entries. The address of the PUBOWNER table is in the SYSCOM block in the 
DOSCON CSECT of NUCON. 



40 



PUBOWNER 



Hexadecimal Field 
Displacement Name 



PUBOWNER DS 
DC 



Field Description, Contents, Meaning 



OH PUB ownership table 

34X f 0001« PUB owner 



PUBOWNER entries have the following meanings: 



Byte 



Value 
X»00* 




X'40 f 


1 


X'01» 



Meaning 

The physical unit is reserved 

CMS is waiting for the volume to be mounted 

Background partition owns the physical unit 
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SfSCOM 



Hexadecimal 


Field 








Displacement 


Name 








50 


IJBTIMER 


DC 


A(0) 




54 


IJBABTAB 


DC 


A(0) 




58 


IJBLIK 


DC 


H«0» 




5A 


IJBTIK 


DC 


X^OIO* 




5C 


IJBPWR 


DC 


A(0) 




60 


IJBTCAVT 


DC 


A(0) 




64 


IJBRFTAB 


DC 


A(0) 




68 


IJBEUECB 


DC 


A(0) 




6C 


IJBOLTEP 


DC 


A(0) 




70 


IJBBASLN 


DC 


A(0) 




74 


IJBTRTAB 


DC 


A(0) 




78 


IJBPBOWN 


DC 


A(0) 




7C 


IJBJATAB 


DC 


A(0) 




80 


IJBPMGR 


DC 


A(0) 




a it 


t ^ t» r+r* rt m 


T\^i 


* tr\\ 




O** 


lUD^M A 


JL/^ 


a. vv; 




88 


IJBSAVSD 


DC 


A CO) 




8C 


IJBLMSTB 


DC 


A(0) 




90 


IJBAHCOM 


DC 


A(0) 




94 


IJBAPTA 


DC 


MO) 




98 


IJBSBLKO 


DC 


A(0) 




9C 


IJBSBLKX 


DC 


F'0« 




A0 


IJBSYSPT 


DC 


X«00» 


A*5 


A1 


IJBRASPT 


DC 


&L1 (0) 


A*6 


A2 


IJBPMRPT 


DC 


AL1 (0) 


A*7 


A3 


IJBSUPPT 


DC 


AL1 (0) 


A*8 


A4 


IJBCRTPT 


DC 


AL1 (0) 


A* 9 


A5 


IJBERPPT 


DC 


AL1 (0) 


A*10 


A6 




DC 


IOX'00* 




BO 




DC 


F'O* 




B4 


IJBMVCAD 


DC 


A(0) 




B8 




DC 


F«0» 




BC 




DC 


H'O' 




BE 




DC 


H»0» 




CO 


IJBMFCER 


DS 


11X«00» 




CB 


IJBHERQ 


DC 


AL1 (0) 


A* 11 


CC 


IJBPOBLN 


DC 


S(0) 




CE 


IJBAPNO 


DC 


HM« 




DO 


IJBSEGT 


DC 


A(0) 




D4 


IJBPFT 


DC 


A(0) 




D8 


IJBPFTX 


DC 


AfO) 




DC 


IJBBOX 


DC 


A(0) 




EO 


IJBDPDTB 


DC 


A(0) 




E4 




DC 


F«0« 




E8 


IJB7IRAD 


DC 


A(0) 




EC 


IJBEOR 


DC 


F»0« 




FO 


IJBFTTAB 


DC 


A(0) 




F4 


IJBSVA 


DC 


A(0) 




F8 


IJBSVIS 


DC 


A(0) 




FC 


ARPSL 


DC 


A(0) 




100 


ARPSR 


DC 


A(0) 




104 


IJBDLAB 


DC 


A(SIS$CODE) 


108 


SIS$CODE 


DC 


CL13«CMS/VSAH« 



Field Description, Contents, Meaning 

Address of timer request table 

Address of AB option table 

Key of task owning the LTA 

Task interrupt key 

Pointer to power table 

Space for VTAH address 

Pointer to RF table 

Pointer to EO and ECB table 

Address of OLTEP bucket 

Pointer to HAS linkage area 

Address of ASCII table 

Address of PDB ownership table 

Address of job accounting common area 

Base address of programmer routines 



A-f? <"■«"•« *.*•-* w*r-A -^i 



r^^-T, -,,-,-v- 



jiuuiiCos ui >— >— n LLausjicui. «ui.jv cu-ca 

Pointer to SDAID common area 

Address of line mode table 

Address of VSAM common register 

Address of PTA 

Pointer to first system task block 

Pointer to current system task 

For alignment 

Pointer to RAS task block 

Pointer for PMGR task block 

Pointer to SP7R task block 

Pointer to CRT task block 

Pointer to ERP task block 

Reserved for IBM use 

Reserved for IBM use 

Pointer to MVCFLD 

Reserved for IBM use 

Reserved for IBM use 

Reserved for IBM use 

Information on MFCM and MFCO ERP 

Number of error queue entries 

Length of PDB table 

Number of active partitions 

Address of segment table 

Address of page frame table 

Pointer to page frame table extension 

Pointer to boundary box 

Pointer to DPD table 

Reserved for IBM use 

Address of VIRTAD routine 

End of real storage 

Address of the fetch table 

Address of the SVA start 

Address of SVA GETVIS area 

Reserved for IBM use 

Reserved for IBM use 

Pointer to system code name 

System code name 
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SYSNAHES 

SYSNAMES: SAVED SYSTEMS NAMES 

SYSHAMES defines the names of any saved systeMS which may be loaded by CMS routines. 
SYSHAMES describes the entries in the SYSNAMES table which is pointed to by the ASYSNAMES 
field in HUCON. 



10 



18 



20 



28 



CMSSEG 



CMSVSAM 



CMSAMS 



CMSDOS 



CMSBAH 



CMSZER 



Hexadecimal Field 
Displacement Name 




8 
10 
18 
20 
28 



30 



CMSSEG 


DC 


CL8*CMSSEG« 


CMSVSAM 


DC 


CLS^MSVSAH 1 


CMSAMS 


DC 


CLS'CMSAMS 1 


CMSDOS 


DC 


CL8«CMSDOS» 


CMSBAM 


DC 


CLS'CMSBAM' 


CMSZER 


DC 


CLS'CMSZER 1 


SYSNEND 


DS 


0D 



Field Description, Contents, Meaning 

CMS shared system name 

VSAM shared system name 

Access Method Services shared system name 

DOS shared system name 

DOSVS/BAM shared segment name 

Segment zero returns and shares system status 



SYSNCNT EQ0 (SYSHEND-SYSUAMES) /8 Size in doublewords (X»06») 



242 IBM VM/370 Data Areas and Control Block Logic 

Licensed Material — • Property of IBM © Copyright IBM Corp. 1979 



Pg. of SY20-0884-3 Rev June 29, 1979 by Supp LD23-9035-0 for 5748-XE1 

TLBBLGK 



TLBBLOK: TAPE LABEL PROCESSING INFORMATION 



TLBBLOK contains information used by the CMS tape label processing routines. 



10 



18 



1 




TLBNAME 




I T*1 


| T*2 | T*3 | 


T*4 | 


TLBTAPID 


| TLBLABID 




TLBBLKCT 




I 



• For nonstandard labels, the following is the format: 



18 | 



TLBNSLNM 



Hexadecimal Field 
Displacement Name 






TLBNAME DS 


CL8 


8 


TLBTYPE DS 


1X 




l±t§ dgfined 
TLBE07 ~ EQO 


in TLBTYPE 
X«80» 




TLBCLOOT EQU 


X»0C» 




TLBCLIN EQO 


X'08' 




TLBOPOOT EQO 


X»04' 




TLBOPIN EQO 


X'00» 



10 



18 



TLBCALL DS 



1X 



Bits defined in TLBCALL 
TLBOS EQO X 7 80» 
TLBDOS EQD X'40 1 
TLBCMS EQO X*20« 
TLBCMAC EQO X'10» 



TLBLAST DS 



1X 



Field Description, Contents, Meaning 

Called routine name (DMSTLB) 
T*1 Type of call 



End of volume label call 
Close output 
Close input 
Open output 
Open input 

T*2 Caller identification 



OS simulation 
DOS simulation 
CMS simulation 
CMS macro 

T*3 Label type 



Bits defined in TLBLAST 



TLBMSPC EQO 

TLBNSLMD EQO 

TLBSOL EQO 

TLBOSER EQO 

TLBSL EQO 

TLBBLP EQO 

TLBNONE EQO 

TLBMODE DS 
TLBTAPID DS 



X^O 1 

X»10« 

TLBSL+TLBOSER 

X'04« 

X'02 f 

X'01' 

x»oo« 



IX 

CL4 



T*4 



CMS macro space to TM or WTM 

Nonstandard label routine is the module 

Standard user labels 

Oser bit 

IBM standard label 

No label processing 

Label type not specified 

Tape MODESET byte 
Tape identification 



Displacement XMO^ Field differs de pe n d en t on type of label to be processed 



TLBDTFPT DS 
TLBFCBPT DS 
TLBLABID DS 

TLBBLKCT DS 



1F 
1F 
CL8 

1F 



DTF pointer for DOS 

FCB pointer for OS 

LABSECT name (or identifier) for CMS 

Block count for CMS 
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TLBBLOK 



Hexadecimal Field 
Displacement Name 



Field Description, Contents, Meaning 



For Nonstand ard Label Onl y 
interface 



18 



ORG 
TLBNSLNM DS 

TLBSIZE EQO 
TLBDWSZ EQO 



TLBSLKCT 
CL8 

*-TLBBLOK 
(TLBSIZE+7)/8 



when it overlays part of standard Label 



Nonstandard label routine file name 
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Section 3. RSCS Data Areas and Control 

O I **. **. \, M. 

a iuui\a 



This section describes in detail each of the data areas used by RSCS. Onlike the CP and 
CMS foraat blocks in this publication, the RSCS format blocks are on fullword boundaries. 

This section of the publication contains only DSECTs. Appendixes B and C contain 
other control areas used by RSCS. 
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ASYNE 



ASYHE; ASYNCHRONOUS EXIT ELEMENT 

ASYNE defines symbolic addresses for elements on an asynchronous exit gueue. An 
asynchronous exit queue element contains information by which a task requests that it 
handle asynchronous interrupts. 

IOEXITQ, EXTQ, and ALERTQ in SVECTORS are the heads of three asynchronous exit queues. 
Each of these queues is comprised of supervisor elements defined by the ASYNE DSECT. 
IOEXITQ points to requests for I/O exits, EXTQ points to requests for external exit 
requests, and ALERTQ points to requests for ALERT exits. 



1 — - 




ASYNHEXT 




i 


I ASYNTASK | 


I ASYNEXIT | 


i — 


ASYNCODE 


I//ASYNSPAR///I 


ASYNID 


1 



Hexadecimal Field 
Displacement Name 



ASYNNEXT DS 1F 
ASYNTASK DS 1F 

ASYNEXIT DS 1F 
ASYNCODE DS AL2 



ASYNSPAR DS 1X 
ASYNID DS 1X 



Field Description, Contents, Meaning 

Address of the next asynchronous 

interrupt exit request element 
Address of task element describing 

the task that requested the 

asynchronous interrupt 
Address of the requested asynchronous exit 

routine 
Address of the device for which 

asynchronous I/O interrupts are 

requested or interrupt bit code 
Reserved for IBM use 
1-byte identification of the task owning the 

asynchronous exit routine 
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Appendix A. CP and RSCS Equate Symbols 



This Appendix contains Assembler language equate symbols used to reference CP 
and RSCS data for: 

• VM/370 Device Classes, Types, Models, and Features 

• VM/370 Machine Osage 

• VM/370 Extended Control Registers 

• VM/370 CP Usage 

• VM/370 Registers 
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YAtllSl DEVICE CLASSES, TYPES, MODELS, AND FEATURES 



Field 






Name 






CLASTERH 


EQD 


X«80* 


TYP2700 


EQD 


X'40» 


TYP2955 


EQO 


TYP27GG 


TYPTELE2 


EQU 


X»20* 


TYPTTY 


EQO 


X*20« 


TYPIBM1 


EQO 


X«10» 


TYP2741 


EQO 


X«18« 


TYP1050 


EQO 


X«14« 


TYPDNDEF 


EQO 


IMC 


TYPBSC 


EQO 


X»80« 


TYP3210 


EQO 


X»00» 


TYP3215 


EQO 


TYP3210 


TYP2150 


EQO 


TYP3210 


TYP1052 


EQO 


TYP3210 



FTRDIAL EQO X'01« 
CLASGRAF EQO X*40» 



TYP2250 


EQO 


X«80« 


TYP2260 


EQO 


X'40» 


TYP2265 


EQO 


X»20» 


TYP3066 


EQO 


X«10« 


TYP1053 


EQO 


x«08» 


TYP3277 


EQO 


X«04« 


| TYP3278 


EQO 


X'01 1 


TYP3284 


EQO 


X»02« 


TYP3286 


EQO 


TYP3284 


TYP3287 


EQO 


TYP3284 


TYP3288 


EQO 


TYP3284 


| TYP3289 


EQO 


TYP3284 


TYP3138 


EQO 


TYP3277 


TYP3148 


EQO 


TYP3277 


TYP3158 


EQO 


TYP3277 


FTROPRDR 


EQO 


X'80» 


CLASOR1 


EQO 


X'20' 


TYPRDR 


EQO 


X'80» 


TYP2501 


EQO 


X'81" 


TYP2540R 


EQO 


X'82» 


TYP3505 


EQO 


x»84« 


TYP1442R 


EQO 


X«88» 


TYP2520R 


EQO 


X'90 1 


TYPTIMER 


EQO 


X*40» 


TYPTR 


EQO 


X«20» 


TYP2495 


EQO 


X'21» 


TYP2671 


EQO 


X«22» 


TYP1017 


EQO 


X»24' 


CLASORO 


EQO 


XMO' 


TYPPON 


EQO 


x»80» 


TYP2540P 


EQO 


X'82» 


TYP3525 


EQO 


X»84» 


TYP1442P 


EQO 


X'88' 


TYP2520P 


EQO 


X'90« 


TYPPRT 


EQO 


X'40' 


TYP1403 


EQO 


X»41« 



Field Description, Contents, Meaning 

Terminal device class 

2700 bisyncronous line 

2955 communications line 

Telegraph terminal control type II 

Teletype terminal 

IBM terminal control type I 

2741 communications terminal 

1050 communications terminal 

Terminal device type is undefined 

Bisyncronous line for 3270 remote stations 

3210 console 

3215 console 

2150 console 

1052 console 

Dial feature 

Graphics device class 

2250 display unit 
2260 display station 
2265 display station 
3066 console 

1053 printer 

3277 display station 

3278 display station/system console 
3284 printer 

3286 printer 

3287 printer 

3288 printer 

3289 printer 

3138 system console 
3148 system console 
3158 system console 

Operator identification card reader 

Onit record input device class 

Card reader device 

2501 card reader 

2540 card reader 

3505 card reader 

1442 card reader/punch 

2520 card reader/punch 

Timer device 

Tape reader device 

2495 magnetic tape cartridge reader 

2671 paper tape reader 

1017 paper tape reader 

Onit record output device class 

Card punch device 
2540 card punch 
3525 card punch 
1442 card punch 
2520 card punch 
Printer type device 
1403 printer 
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Field 



TTP3211 EQO X«42« 

TIP3203 EQU X«43« 

TIP1443 EQO X*44* 

| TYP3289E EQO X«46« 



3211 printer 

3203 printer (3211 ana 1403) 

1443 printer 

3289-E printer 
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Field 






Name 






TYP3800 


EQO 


X'45» 


TYPTP 


EQO 


X«20' 


TYP1018 


EQO 


X»24' 


FTROCS 


EQU 


X'01« 


FTR4WCGM 


EQO 


X«80» 


CLASTAPE 


EQD 


X»08» 


TYP2401 


EQO 


X'80« 


TYP2415 


EQO 


X»40» 


TYP2420 


EQO 


X'20 1 


TYP3420 


EQO 


X«10' 


TYP3410 


EQO 


X»08« 


TYP3411 


EQO 


TYP3410 


| TYP8809 


EQO 


X'04» 


FTR7TRK 


EQO 


X'80« 


FTRDLDNS 


EQO 


X»40» 


FTRTRANS 


EQO 


X«20» 


FTRDCONV 


EQO 


X'10' 


CLASDASD 


EQO 


X'04» 


TYP2311 


EQO 


X«80« 


TYP2314 


EQO 


X«40' 


TYP2319 


EQO 


TYP2314 


TYP2321 


EQO 


TYP2311 


TYP3330 


EQO 


X'10 1 


TYP3333 


EQO 


TYP3330 


TYP3350 


EQO 


X'08» 


TYP2301 


EQO 


TYP2311 


TYP2303 


EQO 


TYP2311 


TYP2305 


EQO 


X»02« 


TYP3340 


EQO 


X«01« 


FTRRPS 


EQO 


X«80« 


FTREXTSN 


EQO 


X«40« 


FTR2311T 


EQO 


X'20 1 (= 


FTR2311B 


EQO 


X s 10 ! (= 


FTR35MB 


EQO 


X«08» 


FTR70MB 


EQO 


X'04« 


FTRRSRL 


EQO 


X'02 1 


VIRTUAL 


EQO 


X«01' 


SYSVIRT 


EQO 


X'20« 


FTRVIRT 


EQO 


X'01 1 


CLASSPEC 


EQO 


X , 02« 


TYPCTCA 


EQO 


X«80« 


TYP3704 


EQO 


X»40» 


TYP3705 


EQO 


TYP3704 


TYP3851 


EQO 


X«20« 


TYPSRF 


EQO 


X f 04« 


TYPDNSOP 


EQO 


X'01« 


FTRTYP1 


EQO 


X'10 1 


FTRTYP2 


EQO 


X«20» 


FTRTYP3 


EQO 


FTRTYP2 


FTRTYP4 


EQO 


FTRTYP1 


| CLASFBA 


EQO 


X«01« 


| TYPFBA 


EQO 


X'OO' 



Field Description, Contents, Meaning 

3800 printing subsystem 
Tape punch device 
1018 paper tape punch 

OCS feature 

3800 has four WCGH available. Note that FTREXTSN (X'40«) is 
also used for a 3800 printer. 

Magnetic tape device class 

2401 tape drive 
2415 tape drive 
2420 tape drive 
3420 tape drive 

3410 tape drive 

3411 tape drive 
8809 tape drive 

7-track feature 
Dual density feature 
Translate feature 
Data conversion feature 

Direct access storage device class 

2311 disk storage drive 

2314 disk storage facility 

2319 disk storage facility 

2321 data cell drive 

3330 disk storage facility 

3333 disk storage facility 

3350 disk storage facility 

2301 parallel drum 

2303 serial drum 

2305 fixed head storage device 

3340 disk storage facility 

Rotational positional sensing (RPS) installed (3340) 

Extended sense bytes (24 bytes) 
IT) Top half of 2314 used as 2311 
IB) Bottom half of 2314 used as 2311 

35 multibyte data module mounted (3340) 

70 multibyte data module mounted (3340) 

Reserve/release are valid CCH operation codes 

Device is a 3330V virtual machine 

Device is a 3330V system virtual machine 

3330 virtual (MSS) volume 

Special device class 

Channel-to-channel adapter 

3704 programmable communication control unit 

3705 programmable communication control unit 
3851 Mass Storage Controller 

SRF device (#7443) 

Device not supported by VM/370 

Type 1 channel adapter (370x) 

Type 2 channel adapter (370x) 

Treat as type 2 channel adapter (370x) 

Treat as type 1 channel adapter (370x) 

Fixed block storage device class 

Generic fixed block storage device 
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Field 
Haae 

I TYP3310 
I TYP3370 



EQO 
EQO 



X»01« 
X'02* 



Field Description, Contents, Meaning 

3310 fixed block storage device 
3370 fixed block storage device 
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VH/370 EQUATE SYMBOLS ~ MACHINE OSAGE 

Field Description, Contents, Meaning 



Field 
Name 



Bits defined in Standard/Extended PSW 



EXTHODE EQU X 

MCHEK EQU X 

WAIT EQO X 

PROBMODE EQU X 

Bits defined in 

PERMODE EQO X 

TRANMODE EQU X 

IOHASK EQU X 

EXTMASK EQU X 




08* 
04* 
02* 
01" 

Extended PSW 
40' 
04* 
02 • 
01* 

rliaiiiial Cfa^ni 



INTREQ 
BUSOUT 
EQCHK 
DATACHK 



EQU 
EQU 
EQU 
EQU 



Bit 12 - extended node 

Bit 13 - machine check enabled 

Bit 14 - wait state 

Bit 15 - problem state 



Bit 01 - PER enabled 

Bit 05 - translate mode 

Bit 06 - summary I/O mask 

Bit 07 - summary external mask 



80* 
40* 
20' 
10' 
08* 
04* 
02« 
01' 
80' 
40* 
20* 
10* 
08* 
04* 
02* 
01* 



Bit 32 
Bit 33 - 
Bit 34 - 
Bit 35 - 
Bit 36 - 
Bit 37 - 
Bit 38 - 
Bit 39 - 
Bit 40 - 
Bit 41 - 
Bit 42 - 



Bit 
Bit 44 
Bit 45 
Bit 46 
Bit 47 



43 - 



attention 
status modifier 
control unit end 
busy 

channel end 
device end 
unit check 
unit exception 
program-control interrupt 
incorrect length 
program check 
protection check 
channel data check 
channel control check 
interface control check 
chaining check 



Bits d efined in Cha nnel Command Word (CCW) 

CD EQU X*80* Bit 32 

CC EQU X*40* Bit 33 

SILI EQU X«20* Bit 34 

SKIP EQU X«10* Bit 35 

PCIF EQU X*08» Bit 36 

IDA EQU X*04* Bit 37 



chain data 

command chain 

suppress incorrect length indicator 

suppress data transfer 

program-control interrupt FETCH 

indirect data address 



Bits def ine d in Sens e By te (c ommon to most devices) 
CMDREJ EQU X 



80' 
40' 
20* 
10* 
08* 



Bit - command reject 

Bit 1 - intervention required 

Bit 2 - bus out 

Bit 3 - equipment check 

Bit 4 - data check 
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7M/37Q EQJJATE SYMBOLS — EXTENDED CONTR OL RE GIST ERS 



Field 
Name 

Bits defined in CREGO 
BYTE 



BLKMPX 


EQO 


X*80* 


SSMSOPP 


EQD 


X'40 1 


TODSYNC 


EQU 


X»20» 


LAP370E 


EQO 


I'10» 


• BYTE 1 






PAGE4K 


EQO 


X«80« 


PAGE2K 


EQO 


X«40» 


SEG1M 


EQO 


XMO' 


• BYTE 2 






MFAMASK 


EQO 


X'80 1 


EMSMASK 


EQO 


X'40» 


XCMASK 


EQO 


X'20» 


SYNCMASK 


EQO 


XMO* 


CKCMASK 


EQO 


X'08» 


CPTMASK 


EQO 


X«04« 


• BYTE 3 






INTMASK 


EQO 


X'80 1 


KEYMASK 


EQO 


X«40* 


SIGMASK 


EQO 


X'20 ! 



Field Description, Contents, Meaning 



Bit 00 - enable block multiplexing 
Bit 01 - enable SSM suppression 
TOD synchronous control 
Low address problem active 

Bit 08 - use 4K pages 
Bit 09 - use 2K pages 
Bit 11 - use 1M segments 

Bit 16 - malfunction alert mask 

Bit 17 - emergency signal mask 

Bit 18 - external call mask 

Bit 19 - TOD synchronous check mask 

Bit 20 - mask on clock comparator interrupt 

Bit 21 - mask on processor timer interrupt 



Bit 24 - mask on interval timer interrupt 

Bit 25 - mask on operator key interrupt 

Bit 26 - mask on external signals 2 through 7 



Si£s defined in C REG 6 for 370E 

• BYTE 

PROB370E EQO X'UO' 



Virtual machine is running in virtual problem state 



• BYTE 3 






M7SA370E 


EQO 


X'04' 


Bits defined 
• BYTE 3 


in CREG8 


PERFCL 


EQO 


X*80« 


RESPCL 


EQO 


X f 40* 


SCHEDCL 


EQO 


X'20» 


TIMECL 


EQO 


X'10» 


OSERCL 


EQO 


x»08' 


PRIYCL 


EQO 


X , 04« 


DASDCL 


EQO 


X»02» 


SEEKCL 


EQO 


X»01» 


• BYTE 4 






SPROFCL 


EQO 


X«80« 


Bits defined 
• BYTE 


in CREG9 


PERSOBR 


EQO 


X'80« 


PERIFET 


EQO 


X«40« 


PERSALT 


EQO 


X«20« 


PERGPRS 


EQO 


XMO' 


Bits defined 
• BYTE 


in CREG14 


HARDSTOP 


EQO 


x'so' 


SYNCLOG 


EQO 


X«40« 


IOLOG 


EQO 


X»20« 


RECOVRPT 


EQO 


X'08' 


CONFGRPT 


EQO 


X»04» 


DAHAGRPT 


EQO 


X»02« 


WARNGRPT 


EQO 


I'd* 



MVSA (MVS/System Extensions support) is active 



Sample hardware/software utilizations 

Trace response class 

Trace scheduler activity class 

Execution timing class 

Sample user resource usage class 

Privileged operands class 

Sample DASDs; utilizations class 

Trace DASD seek activity 



Trace system profile class 



Bit 00 - monitor successful branches 

Bit 01 - monitor instruction fetches 

Bit 02 - monitor storage alteration 

Bit 03 - monitor register alteration 



Bit 00 - check stop control 

Bit 01 - synchronous logout control 

Bit 02 - I/O logout control 

Bit 04 - recovery report mask 

Bit 05 - configuration report mask 

Bit 06 - external damage report mask 

Bit 07 - warning condition report mask 
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Bits defined in CREG14 (cont. ) 

• BYTE 1 

ASYNELOG EQO X^O' Bit 08 - asynchronous extended logout control 

ASYNFLOG EQO X'lO 1 Bit 09 - asynchronous fixed logout control 
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VM/370 EQUATE SYMBOLS — CP USAGE 



rie±a 
Name 

Bits defined for TRANS macro 



Field Description, Contents, Meaning 



BRING EQU X*80* 

DEFER EQU X* 40» 

LOCK EQU X«20» 

IOERETN EQU X« 10' 

SYSTEM EQU X»08« 

YFAULT EQU X*04' 



Equates for Parameter 
DELSEGS EQU X s 80* 
DELPAGES EQU 
VRALOC EQU 
PAGTONLY EQU 
NEHPAGES EQU 
NEWSEGS EQU 
KEEPSEGS EQU 
OLDVMSEG EQU 



X«40« 
X»20» 
X'10« 
X'08 1 
X*04» 
X , 02' 
X«01« 



Bring requested page 
Defer execution until page in core 
Lock page for I/O operation 
Return I/O errors to caller 

Call to DMKPTRAN for system virtual machine space 
DHKPTRAN call for virtual page. Caller will not 
utilize real address 

Field for Calls to DMKBLDRT/DMKBLDRL 
Release the segment tables 
Release the page/swap tables 
Attempt allocation of Virtual=Real area 
Only one page table and return 
Build new page/swap table 
Build new segment table 
Retain information in old segment table 
VMSEG pointer in VMBLOK valid 



Bits defined 

| HILIGHT EQU 

NOTRESP EQU 

ERRMSG EQU 

NORET EQU 

DFRET EQU 

OPERATOR EQU 

LOGDROP EQU 

LOGHOLD EQU 

PRIORITY EQU 

VMGENIO EQU 

NOAUTO EQU 

ALARM EQU 

NOTIME EQU 

INHIBit EQU 

EDIT EQU 

UCASE EQU 



I2£ 
X« 

x« 

X 1 

x« 
x« 
x« 
x« 

X 1 

x« 
x» 
x« 
x» 
x» 
x« 
x« 

X' 



Terminal I/O via DMKQCN 

8000' Output - highlighted data stream 

4000 * Output - message not a command response 

0800' Output - control program error message 

0400 • Output - return immediately after call 

0200* Output - FRET buffer after gueueing 

0100* Output - message for system operator 

80 f Output - logoff and drop line after message 

40' Output - logoff and hold line after message 

20* Output - write this message immediately 

10* I/O request generated by virtual machine 

04' Output - suppress automatic carriage return 

02 • Output - sound the audible alarm 

01 ■ Output - suppress time stamp on message 

08* Input - prevent display of this data 

04* Input - edit input data for corrections 

02* Input - translate data to uppercase 



Equates 

CHGSHQ 

CHGRDV 

ACTSFB 

OPNSFB 

DELSFB 

CHGSFB 

ADDSFB 

PRTCHN 

PCHCHN 

RDRCHN 



for Spool File 

EQU X'0200« 

EQU X«0100' 

EQU X'80» 

EQU X'40 1 

EQU X'20' 

EQU XM0« 

EQU X'08 1 

EQU X«04» 

EQU X»02* 

EQU X«01» 



Recovery Rou tine - DMKC KS 

Checkpoint a SHQBLOK 

Change attributes of real device 

File being printed or punched 

An open print-punch file 

Delete SFBLOK from checkpoint 

Change existing SFBLOK 

Add new SFBLOK to recovery cylinder 

SFBLOK goes on print chain 

SFBLOK goes on punch chain 

SFBLOK goes on reader chain 



Equates for 7MSAVE SET/RESET routine - DMKCFS 



ASLOGON EQU X«80« 



ASON 
ASOFF 



EQU 

EQ0 



X«40« 
X ! 20 ! 



Enables VMSAVE option if there is exactly one 
entry in DMKSNT for this user (userid=) and 
there is no system saved there 

Parameter to set VMSAVE on 

Parameter to reset VMSAVE option 



Equates for DASD READ/WRITE routine - DMKRPA 

NORLSE EQU" X^OI' Special linkage for virtual machine generation via IPL 



Equates for SWTCHVM macro 
SVMUNLOK EQU X*04» 
SVMNOUPD EQU X« 02' 
SVMSTAY EQU X'01 1 



Unlock only the current virtual machine 
Lock virtual machine with NOUPDT option 
Stack CPEXBLOK for current processor 
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Field 
Haae 






Monitor i 

mhclperf' 


Class 
EQU 


and Code 

x»oo* 


HNCOSYS 
MHCOTH 
MNCOTT 
MHCOSDS 


EQD 
EQO 
EQU 
EQU 


X«0000« 
X«0061' 
X»0062» 
X«0063« 


MHCLRESP 


EQU 


X»01» 


MHCOBRD 

MHCOWRIT 

MHCOERD 


EQU 
EQU 
EQU 


X'0000* 
X«0001« 
X'0002» 


MHCLSCH 


EQU 


X«02« 


MNCODQ 
MNCOAQ 
MNCOAEL 


EQU 
EQU 
EQU 


X«0002» 
X«0003' 
X'OOOiP 


MNCLDSER 


EQU 


X«04» 


MNCOUSER 


EQU 


X»0000' 


MHCLINST 


EQU 


X«05» 


MNCOSIM 


EQU 


X«0000» 


MNCLDAST 


EQU 


X'06» 


MNCODASH 
MHCODAS 


EQU 
EQU 


X'OOOO* 
X'0001' 


MNCLSEEK 


EQU 


X«07» 


MHCOCYL 


EQU 


x»oooo» 


MHCLSIS 


EQU 


X'08« 


MHCODA 


EQU 


X f 0002« 



fieia oescripnoa, tuuieuis, neanxiiy 

Definitions 

Monitor perform class 

Perform class, system performance 

Monitor tape header record 

Monitor tape trailer record 

Monitor collection suspension record 

Monitor response class 

Response class, begin read code 
Response class, write code 
Response class, end read code 

Monitor schedule class 

Schedule class, drop queue code 
Schedule class, add to queue code 
Schedule class, add to eligible list code 

Monitor user class 

User class, user data 

Monitor instruction simulation class 

Instruction class; instruction simulation code 

Monitor DASD/tape class 

DASTAP class, first record 
DASTAP class, data records 

Monitor DASD class 

DASD class, seeks code 

Monitor system profile class 

SYS class, DASD data 
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Field 








Na»e 








Eqaates 


for SIGNAL Macro 


SIGSEHSE 


EQD 


X' 


01* 


SIGXC 


EQO 


X' 


02« 


SIGEMS 


EQO 


X' 


03» 


SIGSTART 


EQO 


X< 


Qty t 


SIGSTOP 


EQO 


X" 


05* 


SIGREST 


EQO 


X' 


06* 


SIGIPR 


EQO 


X" 


07« 


SIGPR 


EQO 


X' 


08» 


SIGSSS 


EQO 


X 


•09» 


SIGIHL 


EQO 


X 


0A« 


SIGICR 


EQO 


X 


0B» 


SIGCR 


EQO 


X" 


0C« 


SIGQOI 


EQO 


X" 


800« 


SIGEXT 


EQO 


X' 


400' 


SIGSYNC 


EQO 


X' 


200« 


SIGSHD 


EQO 


X' 


100 1 


SIGCLK 


EQO 


X' 


'080* 


SIGAPR 


EQO 


X 


»800» 


SIGRES 


EQO 


X 


'400 1 


SIGWAKE 


EQO 


X 


•200* 


SIGDISP 


EQO 


X 


1 100' 


Eqaates 


for TRAC] 


5 macro 


TRCEXT 


EQO 


X 


r 01' 


TRCSVC 


EQO 


X 


■02« 


TRCPGM 


EQO 


X 


'03' 


TRCMCH 


EQO 


X 


■04» 


TRCIO 


EQO 


X 


•05* 


TRCFREE 


EQO 


X 


»06» 


TRCFRET 


EQO 


X 


•07' 


TRCSCH 


EQO 


X 


•08» 


TRCDROP 


EQO 


X 


■09« 


TRCRON 


EQO 


X 


•0A« 


TRCSIO 


EQO 


X 


'OB' 


TRCONSTK 


EQO 


X 


1 0C« 


TRCCSW 


EQO 


X 


' OD 1 


TRCTIO 


EQO 


X 


■0E« 


TRCHALT 


EQO 


X 


'0F» 


TRCONBLK 


EQO 


X 


»10« 


TRCHCP 


EQO 


X 


•11" 


TRCLOK 


EQO 


X 


■12' 


TRCSIGP 


EQO 


X 


•13» 


TRCCLCH 


EQO 


X 


'14» 



Field Description, Contents, Meaning 



Sense order code 

External call order code 

Emergency signal order code 

Start order code 

Stop order code 

Restart order code 

Initial program reset order code 

Program reset order code 

Stop and store status order code 

Initial Microprogram load order code 

Initial processor reset order code 

Processor reset order code emergency signals 

Quiesce emergency signal 

Extend emergency signal 

Clock synchronization emergency signal 

Shutdown emergency signal 

Clock check signal (external call signals) 

Automatic processor recovery (external call signal) 

Resume external call signal 

Wakeup external call signal 

Dispatch external call signal 



External interrupt entry point 

SVC interrupt entry point 

Program interrupt entry point 

Machine check interrupt entry point 

I/O interrupt entry point 

Free storage entry point 

Return storage entry point 

Enter scheduler entry point 

Queue drop entry point 

Run user entry point 

Start I/O entry point 

Onstack I/O interrupt entry point 

Virtual CSW store entry point 

Test I/O entry point 

Halt device entry point 

Onstack IOBLOK or TRQBLOK entry point 

NCP basic transmission unit entry point 

Spin lock entry point 

Signal processor (SIGP) entry point 

Clear channel entry 
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Appendix E. Data Areas and Control Block 
References 



This appendix — a listing of CP, CHS, and RSCS control blocks — contains the 
following: 

• Module references to data areas and control blocks. 

• Information on how certain data areas or control blocks are created and 
released. 
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CP CONTROL BLOCK REFERENCES 



ACCTBLOK 

Built by: DMKHVD 

Released by: DMKHVD, DMKUSO 

Referenced b_y: DMKACO, DMKCKP, DMKHVD, 
DMKSPL 



CCHREC 

l!iil£ hi' DMKCCH 

Released by: DMKCCH, DMKIOE, DMKIOF 

Referenced by: DMKCCH, DMKEIG, DMKSEV, 
DMKSIX 



ACNTBLOK 

Built by: DMKACO, DMKHVD, DMKHRM 

Released by : DMKACO 

Referenced b_y: DMKACO, DMKCKP, DMKHVD, 
DMKJRL, DMKHRM 



CCPARM 

Built by: DMKNLD, DMKSNC 
Released by,: DMKNLD, DMKSNC 
Referenced by: DMKNLD, DMKSNC 



ACTIBLOK 

Built by: DMKSYS 
Released by: N/A 
Referenced b_y: DMKACO, DMKCKP 

ALOCBLOK 

Buil t by: DMKCPI, DMKVDC 

R eleased by: DMKCPI, DMKVDC 

Referenced by: DMKCPI, DMKMON, DMKPGM, 
DMKPGT, DMKTDK, DMKVDC 

BSCBLOK 

Built by.: DMKRGB 

Released by: DMKRGA 

Referenced by: DMKBSC, DMKRGA, DMKRGB 

BUFFER 

Built by: DMKCFM, DMKCPI, DMKERM, 
DMKGRF, DMKLNK, DMKLOG, DMKRGA, DMKRSP 

Released by: DMKCFM, DMKCPI, DMKGRF, 
DMKLNK, DMKRGA, DMKRSP 

Referenced by: DMKALG, DMKCDM, DMKCFG, 

DMKCFM, DMKCFO, DMKCFS, DMKCFV, DMKCPI, 

DMKCPT, DMKCSB, DMKCSO, DMKCSP, DMKCSQ, 

DMKCST, DMKCSU, DMKCSV, DMKERM, DMKGRF, 

DMKGRT, DMKLNK, DMKMSG, DMKRGA, DMKRSP, 

DMKSCN, DMKDDD, DMKVDC, DMKHRM 



CHXBLOK 

Built by: DMKDIA 

R eleased by: DMKVCA 

Referenced by: DMKCFP, DMKCQG, DMKDIA, 
DMKVCA, DMKVSI 

CHYBLOK 

Built by: 

R eleased by: 

Referenced by: DMKDIA, DMKVCA 



CKPBLOK 

Built by: DMKRNH 
Released by: DMKRNH 
Referenced by: DMKRNH, DMKHRM 

CONTASK 

Built by: DMKCNS, DMKGRF, DMKQCN, 
DMKRGA, DMKRGB, DMKRNH 

Rel eased by: 

Referenced by: DMKCNS, DMKDSP, DMKGRF, 
DMKMON, DMKNES, DMKQCN, DMKQVM, DMKRGA, 
DMKRGB, DMKRNH 
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C0ETAB1E 



ECBLOK 



I^oanhl 



•i n nmrcvc: 



R eleased by.: N/A 






nvr xipc 



n 4. »j , ^/ li i\ u 



DMKCDS, 
DMKDGD, 
DMKMNI, 
DMKPTR, 
DMKUDR, 



CPEXBLOK 



DMKCFO, 
DMKDMP, 
DMKPAG, 
DMKQVM, 
DMKODU, 



DMKCPI, 
DMKFRE, 
DMKPGM, 
DMKRPA, 
DMKUNT, 



rsMifRT n 



TMWTrrrii 



DMKCPU, DMKCPV, 
DMKMCC, DMKMCH, 
DMKPGS, DMKPSA, 
DMKSPM, DMKSTR, 
DMKVMA, DMKVMC 



Built by : 
DMKACO, DMKCDS, 
DMKDIA, DMKGRF, 
DMKIOS, DMKLOC, 
DMKPGT, DMKPTR, 
DMKRNH, DMKRPA, 
DMKDSO, DMKVCA, 
DMKVMC 



DMKCFM, 
DMKIOE, 
DMKMCC, 
DMKQCN, 
DMKRSP, 
DMKVDC, 



Released by: DMKCPS, 

DMKMON, DMKPTR 

Referenced by : DMKACO 

DMKCDS, DMKCFM, DMKCFO 

DMKCPB, DMKCPS, DMKCPT 

DMKDGD, DMKDIA, DMKDSB 

DMKFRE, DMKGIO, DMKGRF 

DMKIOT, DMKLOC, DMKLOK 

DMKMCH, DMKMCT, DMKMIA 

DMKMON, DMKPAG, DMKPGM 

DMKPRG, DMKPRV, DMKPRW 

DMKQCN, DMKRGA, DMKRGB 

DMKRSP, DMKSPL, DMKSSS 

DMKSVC, DMKTMR, DMKTRD 

DMKVCA, DMKVMA, DMKVMC 



DDRREC 

Built by: DMKVER 
Released by: DMKVER 
Referenced by: DMKVER 

DMPINREC 

Built by: DMKDMP 
R elea sed by: DMKDMP 
Referenced by : DMKDMP 

DMFKYREC 

Built by: DMKDMP 
R eleased by: DMKDMP 
R eferenced by: DMKDMP 



DMKCPS, 
DMKIOF, 
DMKMCH, 
DMKRGA, 
DMKSPL, 
DMKVDE, 



DMKCPV, 
DMKIOG, 
DMKMON, 
DMKRGB, 
DMKSVC, 
DMKVMA, 



DMKALG, 
DMKCFP, 
DMKCPU, 
DMKDSP, 
DMKIOE, 
DMKMCC, 
DMKMID, 
DMKPGS, 
DMKPSA, 
DMKRNH, 
DMKSTP, 
DMKUSO, 

DMKVSI, 



DMKCCW, 
DMKCNS, 
DMKCPV, 
DMKEXT, 
DMKIOS, 
DMKMCD, 
DMKMNI, 
DMKPGT, 
DMKPTR, 
DMKRPA, 
DMKSTR, 
DMKVAT, 
DMKVSP 



Built bv: DMKBLD 



Relea sed by: DMKCFO, DMKCFS, DMKDSO 



Reference d by : DMKACO, DMKBLD, DMKCDB, 

DMKCDM, DMKCDS, DMKCFF^ DMKCFH, DMKCFP^ 

DMKCFS, DMKCFV, DMKCKP, 

DMKEXT, DMKFPS, DMKHVC, 

DMKPRW, DMKPSA, DMKQVM, 

DMKSVC, DMKTMR, DMKTRC, 

DMKVAT, DMKVMC 



DHKCQR, DMKDSP, 

DMKPRG, DMKPRV, 

DMKSCH, DMKSPM, 

DMKTRD, DMKOSO, 



ERRBLOK 

Buiii by: DMKIOE 
Rel eased by: DMKIOF 
Referenced by: DMKIOE, DMKIOF 



DMKDSP, DMKIOF, IOBLOK 



Built 

DMKCNS, 

DMKCSP, 

DMKGRF, 

DMKRGB, 

DMKVDD, 



by: DMKACO, 
DMKCPB, DMKCPI 
DMKCSU, DMKDGD 
DMKHVC, DMKIOS 
DMKSPL, DMKTDK 
DMKVDE, DMKVDR 



Released by: DMKCFP, 
DMKCPI, DMKCPS, DMKCSO 
DMKDIA, DMKGIO, DMKGRF 
DMKMON, DMKNLD, DMKPAG 
DMKRNH, DMKRSP, DMKSEP 
DMKVDC, DMKVDD, DMKVDE 



Ref eren 
DMKCCW, 
DMKCPS, 
DMKCSO^ 
DMKDIA, 
DMKGRF, 
DMKIOT, 
DMKMON, 
DMKQVM, 
DMKRSP, 
DMKSSS, 
DMKTRD, 
DMKVCA, 
DMKVIO, 



IOERBLOK 



ced by: 
DMKCFP, 
DMKCPT, 
DMKCSV^ 
DMKDIB, 
DMKHVC, 
DMKISM, 
DMKMSW, 
DMKRGA, 
DMKSEP, 
DMKSTK, 
DMKTRK, 
DMKVDC, 
DMKVSC, 



DMKACO 
DMKCNS 
DMKCSB 
DMKDAS 
DMKDSB 
DMKIOE 
DMKLOH 
DMKNLD 
DMKRGB 
DMKSPL 
DMKTAP 
DMKUDR 
DMKVDD 
DMKVSI 



DMKCCW, 
DMKCPS, 
DMKDIA, 
DMKNLD, 
DMKVCA, 
DMKVIO 

DMKCNS, 
DMKDAS, 
DMKHVC, 
DMKRGA, 
DMKTDK, 

DMKVIO 

DMKBSC, 
DMKCPB, 
DMKCSO. 
DMKDAD, 
DMKDSP, 
DMKIOG, 
DMKMCC, 
DMKNLE, 
DMKRNH, 
DMKSPS, 
DMKTDK, 
DMKDNT, 
DMKVDE, 



DMKCFP, 
DMKCSO, 
DMKGIO, 
DMKRGA, 
DMKVDC, 



DMKCPB, 
DMKDGD, 
DMKIOS, 
DMKRGB, 
DMKVCA, 



DMKCCH, 
DMKCPI, 
DMKCSP. 
DMKDGD, 
DMKGIO, 
DMKIOS, 
DMKMNI, 
DMKPAG, 
DMKRSE, 
DMKSPT, 
DMKTRC, 
DMKDSO, 
DMKVDR, 



Saiii hi' DMKBSC, DMKCCH, DHKDAS, 

DMKDIA, DMKDIB, DMKIOE, DMKIOS, DMKRSE, 
DMKTAP, DMKVCA 

Rel eas ed by: DMKBSC, DMKCCH, DMKCCW, 

DMKCFP, DMKCNS, DMKCPS, DMKDAS, DMKDGD, 

DMKDIA, DMKDIB, DMKGIO, DMKGRF, DMKIOE, 

DMKIOS, DMKMON, DMKNLD, DMKRGA, DMKRGB, 
DMKRNH, DMKRSE, DMKRSR, DMKTAP, DMKVIO 
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Referenced by: DMKBSC, DMKCCH, DMKCCW, 

DMKCFP, DMKCNS, DMKCPT, DMKDAS, DMKDAU, 

DMKDGD, DMKDIA, DMKDIB, DMKDSB, DMKEIG, 

DMKGIO, DMKGRF, DMKIOE, DMKIOF, DMKIOS, 

DMKIOT, DMKMSW, DMKNLD, DMKNLE, DMKQVM, 

DMKRGA, DMKRNH, DMKRSE, DMKRSP, DMKSEV, 

DMKSIX, DMKTAP, DBKTRK, DMKUNT, DMKVCA, 

DMKVDC, DMKVDE, DMKVIO, DMKVSC 



IRMBLOK 

Built by.: DMKCFO, DMKCFS 
R eleased by: DMKCFS, DMKIOE 
Refer enced b_y: DMKCFO, DMKIOE 



MIHREC 

Built hi' DMKVER 
Released by: DMKVER 
R eferenced by: DMKVER 



MNHDR 



Built hi' DMKMON 
Released by: DMKMON 
Referenced by: DMKMON 



LOCKBLOK 

Built by: DMKLOC 
R eleased by: DMKLOC 
Referenced by : DMKLOC 

MCHAREA 

Built by: DMKIOG 

Released b y: N/A 

Referenced hi' DMKCCH, DMKCFO, DMKCPD, 
DMKIOG, DMKMCH, DMKMCT 

MCRECORD 

Built by: DMKMCH 
Released b y: N/A 
Referenced b_y: DMKMCH 

MDRREC 

Built by: DMKVER 
Released b_y: DMKVER 
Refer enced b_y: DMKIOF, DMKVER 

MICBLOK 

Built by: DMKCFS, DMKLOG 

Released by: DMKCFS, DMKLOG, DMKOSO 

Referenced by: DMKBLD, DMKCFS, DMKDSP, 
DMKFPS, DMKLOG, DMKMCH, DMKPTR, DMKRPA, 
DMKSTR, DMKTRA 



MN000 

Built hi' DMKMON 
Released by: DMKMON 
Referenced by: DMKMON 

MN001 

Built by: DMKMON 
Released by: DMKMON 
Ref erenced by: DMKMON 

MN002 

Built by: DMKMON 
Released by: DMKMON 
Referenced by: DMKMON 

HN003 

Built by: DMKMON 
Released by: DMKMON 
R eferenced by: DMKMON 

MN097 

Built by: DMKMNI 
Released by: DMKMON 
Referenced by: DMKMNI 
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HN098 

Built by; DMKMNI 
R eleased by: DMKMON 
Referenced by ; DMKMNI 

MN099 

Built by: DMKMON 
R eleased by: DMKMON 
Referenced by: DMKMON 

MN10X 

Built by: DMKMON 
Released by: DMKMON 
Referenced by: DMKMON 

MN20X 

Built by: DMKMON 
Released by: DMKMON 
Referenced by : DMKMON 

MN400 

Built by: DMKMOO 
Released by : DMKMOO 
Referenced by: DMKMOO 

MN410 

Built by: DMKMOO 
Released by.: DMKMOO 
Referenced by: DMKMOO 

MN500 

Built by: DMKMON 
Released by: DMKMON 
Referenced by : DMKMON 



MN600DEV 



Released by: DMKMOO 
Referenced by: DMKMNI, DMKSOO 

MN600HDR 

Built hi' DMKMOO, DMKMNI 
Rel ea sed by: DMKMOO 
Referenced by: DMKMNI, DMKMOO 

MN700 

Built by: DMKMON 
Released by: DMKMON 
Referenced by: DMKMON 

MN802CTR 

Built by: DMKMON 
Released by: DMKMON 
Re ferenced by: DMKMON 

MN802DEV 

Built by: DMKMON 
R eleased by: DMKMON 
Referen ced by: DMKMON 

MONCOM 

Built by: DMKMCC 

Released by: DMKMON 

Referenced by: DMKCPS, DMKDMP, DMKENT, 
DMKMCC, DMKMCD, DMKMIA, DMKMNI, DMKMON, 
DMKMOO 

NCPTBL 

Buiii hi' DMKSNT 
Released by: N/A 
Referenced by: DMKNLD, DMKSNC 
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NICBLOK 

Built by.: DMKNLD 

Released by: DMKNLD 

Referenced bjr: DMKACO, DMKBLD, DMKCFT, 

DMKCKP, DMKCPI, DMKCQR, DMKDIA, DMKHVD, 

DMKLOG, DMKLOH, DMKNES, DMKNET, DMKNLD, 

DMKPSA, DMKQCN, DMKRGA, DMKRGB, DMKRNH, 
DMKVCN, DMKWRM 

OBRRECN (Long OBR) 
Built bv.: DMKIOF 
R eleased by: DMKIOF 
Referenced bjr: DMKIOC, DMKIOF, DMKVFR 

OBRREC (Short OBR) 
Built by.: DMKIOF 
R eleased bv.: DMKIOF 
R eferenced by: DMKIOF 

OWNDLIST 

Assembled into DMKSYS 

Re ferenced bjr: DMKATS, DMKCFS, DMKCKP, 

DMKCKS, DMKCPI, DMKCPU, DMKCQY, DMKDRD, 

DMKPAG, DMKPGM, DMKPGS, DMKPGT, DMKPTR, 

DMKSCN, DMKSPL, DMKUDR, DMKVDA, DMKVDC, 
DMKWRM 

PAGTABLE 

Built by: DMKBLD 

Released bjr: DMKBLD, DMKPGS 

Refer enced by.: DMKATS, DMKBLD, DMKCFF, 
DMKCFG, DMKCPO, DMKPGS, DMKPTR, DMKVAT, 
DMKVMA, 

PGBLOK 

Built bjr: DMKVAT 

Released bjr: DMKCFP, DMKDSP 

Referenced bj: DMKCFP, DMKDSP, DMKVAT 



PSA 



Assembled as part of DMKSYS; part of CP 
nucleus. 



Referenced by: 



DMKATS 
DMKCDB 
DMKCFF 
DMKCFP 
DMKCKS 
DMKCPI 
DMKCQG 
DMKCQY 
DMKCST 
DMKDAU 
DMKDIB 
DMKEIG 
DMKFPS 
DMKHVC 
DMKIOG 
DMKLNK 
DMKMCC 
DHKMID 
DMKMSW 
DMKOPR 
DMKPRG 
DMKQCN 
DHKRPA 
DMKSCN 
DMKSPL 
DMKSSS 
DMKTAP 
DMKTRA 
DMKDDR 
DMKVCA 
DHKVDD 
DMKVIO 
DMKVSI 



DMKBLD 
DMKCDM 
DMKCFG 
DMKCFS 
DWKCKT 
DMKCPS 
DMKCQH 
DMKCSB 
DMKCSO 
DMKDEF 
DMKDMP 
DMKENT 
DMKFRE 
DMKHVD 
DMKIOS 
DMKLOC 
DMKMCD 
DMKMNI 
DMKNES 
DMKPAG 
DMKPRV 
DMKQVM 
DMKRSE 
DMKSEP 
DHKSPS 
DMKSTK 
DMKTCS 
DMKTRC 
DMKUDU 
DMKVCH 
DMKVDE 
DMKVMA 
DMKVSP 



DMKACO 
DMKBSC 
DMKCDS 
DMKCFH 
DMKCFT 
DMKCLK 
DHKCPT 
DMKCQP 
DMKCSO 
DMKCSV 
DMKDEG 
DMKDRD 
DMKERM 
DMKGIO 
DMKIOC 
DMKIOT 
DMKLOG 
DMKMCH 
DMKMON 
DHKNET 
DMKPGM 
DMKPRW 
DMKRGA 
DMKRSP 
DMKSEV 
DMKSPT 
DMKSTP 
DMKTDK 
DMKTRD 
DHKONT 
DHKVCN 
DMKVDR 
DMKVMC 
DMKVSQ 



DMKALG, 
DMKCCH 
DMKCFC 
DMKCFM 
DMKCFV 
DMKCNS 
DMKCPU 
DMKCQQ 
DMKCSP 
DMKCVT 
DMKDGD 
DMKDSB 
DHKEXT 
DMKGRF 
DMKIOE 
DMKISM 
DMKLOH 
DHKMCT 
DMKMOO 
DMKNLD 
DMKPGS 
DMKPSA 
DMKRGB 
DMKSAV 
DHKSIX 
DMKSRM 
DMKSTR 
DMKTHI 
DMKTRK 
DMKDSO 
DMKVDA 
DMKVDS 
DMKVMI 

DMKWRM 



DMKAPI, 
DMKCCW, 
DMKCFD, 
DMKCFO, 
DMKCKP, 
DMKCPB, 
DMKCPV, 
DMKCQR, 
DMKCSQ, 
DMKDAS, 
DMKDIA, 
DMKDSP, 
DMKFMT, 
DMKGRT, 
DMKIOF, 
DMKJRL, 
DMKLOK, 
DMKMIA, 
DMKMSG, 
DMKNLE, 
DMKPGT, 
DMKPTR, 
DMKRNH, 
DMKSCH, 
DMKSNC, 
DMKSSP, 
DHKSVC, 
DMKTMR, 
DMKTRM, 
DMKVAT, 
DMKVDC, 
DMKVER, 
DHKVSC, 



DMKENT, DMKIOG, 
DMKMON, DMKMOO, 
DMKSCN, DMKSSP, 



RCHBLOK 

Assembled into CP nucleus module DMKRIO 

R eleased by: N/A 

Referenced by: DMKCCH, DMKCFO, DMKCKP, 

DMKCPB, DMKCPI, DMKCPS, DMKCPT, DMKCPV, 

DMKCQP, DMKDIA, DMKDSB, 

DMKIOS, DMKIOT, DMKMNI, 

DMKNES, DMKPRV, DMKQVM, 
DMKSSS, DMKVCH 

RCUBLOK 

Assembled into CP nucleus module DMKRIO. 

R elea sed by: N/A 

Referenced by: DMKCCH, DMKCCW, DMKCFO, 

DMKCKP, DMKCPB, DMKCPI, DMKCPS, DMKCPT, 

DMKCPV, DMKCQP, DMKDIA, DMKDSB, DMKENT, 

DMKGRF, DMKIOC, DMKIOS, DMKIOT, DMKMNI, 

DMKMON, DMKMOO, DMKNES, DMKNLD, DMKPRV, 

DMKQVM, DMKSCN, DMKSSP, DMKSSS, DMKVCH 
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RCWTASK 

Built by: DMKCCW 

R eleased by: DMKCCW, DMKUNT 

Referenced by: DMKCCW, DMKCFP, DMKCPB, 
DMKHVC, DMKIOS, DMKISM, DMKTRD, DMKTRK, 
DMKONT, DMKVDR, DMKVIO 



Referenced by: DMKCKP, DMKCQP, 
DMKRSP, DMKSPL, DMKTCS 



SAVEAREA 

Built by: DMKCPI, DMKSVC 
Released by: DMKSVC 



DMKCSO, 



RDEVBLOK 



Built by; Assembled into CP nucleus 
module DMKRIO 



R eleased by : N/A 
Referenced by: 



DMKBSC 
DMKCFH 
DMKCFT 
DMKCPB 
DMKCPV 
DMKCQR 
DMKDAU 
DMKDRD 
DMKHVD 
DMKIOS 
DMKMCC 
DMKNES 
DMKPAG 
DMKPSA 
DMKRGB 
DMKSEP 
DMKSSP 
DMKTRK 
DMKVCH 
DMKVDE 
DMKVSI 



DMKCCH 
DMKCFM 
DMKCKP 
DMKCPI 
DMKMSG 
DMKCQY 
DMKDEF 
DMKDSB 
DMKIOC 
DMKIOT 
DMKMNI 
DMKNET 
DMKPGM 
DMKPTR 
DMKRNH 
DMKSNC 
DMKSSS 
DMKTRM 
DMKVCN 
DMKVDR 
DMKVSP 



DMKACO 
DMKCCW 
DMKCFO 
DMKCKS 
DMKCPS 
DMKCQG 
DMKCSB 
DMKDGD 
DMKDSP 
DMKIOE 
DMKLNK 
DMKMON 
DMKNLD 
DMKPGS 
DMKQCN 
DMKRSE 
DMKSPL 
DMKTAP 
DMKDDR 
DMKVDA 
DMKVDS 
DMKWRM 



DMKATS, 
DMKCFC, 
DMKCFP, 
DMKCKT, 
DMKCPT, 
DMKCQP, 
DMKCSO, 
DMKDIA, 
DMKENT, 
DMKIOF, 
DMKLOG, 
DMKMOO, 
DMKNLE, 
DMKPGT, 
DMKQVM, 
DMKRSP, 
DMKSPS, 
DMKTCS, 
DMKUNT, 
DMKVDC, 
DMKVER, 



DMKBLD, 
DMKCFG, 
DMKCFS, 
DMKCNS, 
DMKCPU, 
DMKCQQ, 
DMKDAS, 
DMKDMP, 
DMKGRF, 
DMKIOG, 
DMKLOH, 
DMKMSW, 
DMKOPR, 
DMKPRV, 
DMKRGA, 
DMKSCN, 
DMKSPT, 
DMKTDK, 
DMKUSO, 
DMKVDD, 
DMKVSC, 



Ref eren 

DMKATS 

DMKCDB 

DMKCFF 

DMKCFP 

DMKCKT 

DMKCPT 

DMKCQP 

DMKCSO 

DMKCSV 

DMKDEG 

DMKDRD 

DMKFMT 

DMKIOC 

DMKIOT 

DMKLOH 

DMKMID 

DMKMSW 

DMKNLE 

DMKQVM 

DMKRSE 

DMKSNC 

DMKSRM 

DMKSVC 

DMKTRA 

DMKUDR 

DMKVCA 

DMKVDE 

DMKVMC 



ced by: 
DMKBLD 
DMKCDM 
DMKCFG 
DMKCFS 
DMKCLK 
DMKCPU 
DMKCQQ 
DMKCSP 
DMKDAS 
DMKDGD 
DMKDSB 
DMKGIO 
DMKIOE 
DMKISM 
DMKMCC 
DMKMNI 
DMKNEM 
DMKPGM 
DMKRGA 
DMKBSP 
DMKSPL 
DMKSSP 
DMKTAP 
DMKTRC 
DMKUDU 
DMKVCH 
DMKVDR 
DMKVSC 



DMKACO 
DMKBSC 
DMKCDS 
DMKCFH 
DMKCFT 
DMKCNS 
DMKCPV 
DMKCQR 
DMKCSQ 
DMKDAU 
DMKDIA 
DMKEIG 
DMKGRF 
DMKIOF 
DMKJRL 
DMKMCD 
DMKMON 
DMKNES 
DMKPGS 
DMKRGB 
DMKSEP 
DMKSPM 
DMKSSS 
DMKTCS 
DMKTRD 
DMKUNT 
DMKVDA 
DMKVDS 
DMKVSP 



DMKALG, 
DMKCCH 
DMKCFC 
DMKCFM 
DMKCFV 
DMKCPB 
DMKCQG 
DMKCQY 
DMKCST 
DMKDDR 
DMKDIB 
DMKENT 
DMKGRT 
DMKIOG 
DMKLNK 
DMKMCH 
DMKMOO 
DMKNET 
DMKPTR 
DMKRNH 
DMKSEV 
DMKSPS 
DMKSTP 
DMKTDK 
DMKTRK 
DMKUSO 
DMKVDC 
DMKVER 

DMKWRM 



DMKAPI, 
DMKCCW, 
DMKCFD, 
DMKCFO, 
DMKCKS, 
DMKCPS, 
DMKCQH, 
DMKCSB, 
DMKCSU, 
DMKDEF, 
DMKDIR, 
DMKERM, 
DMKHVD, 
DMKIOS, 
DMKLOG, 
DMKMIA, 
DMKMSG, 
DMKNLD, 
DMKQCN, 
DMKRPA, 
DMKSIX, 
DMKSPT, 
DMKSIR, 
DMKTHI, 
DMKTRM, 
DMKVAT, 
DMKVDD, 
DMKVMA, 



RECBLOK 



Built by: DMKCKS, DMKCPI, DMKPGT, 
DMKRSP, DMKVSP, DMKWRM 

Released by: DMKPGT, DMKSPL, DMKUSO 

Refer enced by: DMKCKP, DMKCKS, DMKCKT, 
DMKCPI, DMKDMP, DMKPGT, DMKRSP, DMKSPL, 
DMKUSO, DMKVSP, DMKWRM 



RECPAG 

Built by: DMKIOF, DMKIOG 

R eleased by: DMKIOF, DMKIOG 
Referenced by : DMKIOF, DMKIOG 

RSPLCTL 

Built by: DMKRSP 
Released by: DMKRSP 



SAvtABLjs 

Built by: Assembled into CP pageable 
module DMKSNT 

Released by: N/A 

Referenced by: DMKCFF, DMKCFH, DMKCFS, 
DMKCKP, DMKCQY 



SDRBLOK 

Built by: DMKIOF 
Released by: DMKIOE 
Referenced by: DMKIOE, DMKIOF 

SEGTABLE 

Built by: DMKBLD 
Released by: DMKBLD 
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Refer enced bj: DMKATS, DMKBLD, DMKCKP, 
DMKPGS, DMKVMA 



SFBLOK 

Built bV.: DMKCKS, DMKNLD, DMKSPL, DMKWRM 

Released b.y: DMKCKS, DMKRSP, DMKSPL, 
DMKDSO 



Referenced by: DMKACO, 

DMKCKT, DMKCPI, DMKCQH, 

DMKCSP, DMKCSQ, DMKCST, 

DMKDMP, DMKDRD, DMKMIA, 

DMKRSE, DMKRSP, DMKSEP, 

DMKSPT, DMKTCS, DMKOSO, 
DMKWRM 



DMKCKP, DMKCKS, 

DMKCQR, DMKCSO, 

DMKCSD, DMKCSV, 

DMKMNI, DMKNLE, 

DMKSPL, DMKSPS, 

DMKVSP, DMKVSQ, 



SHQBLOK 

Built bj: DMKCSP, DMKWRM 

Released by.: DMKCSP 

Referenced b_y: DMKCKS, DMKCQR, DMKCSQ, 
DMKSPL, DMKWRM 

SHRTABLE 

Built by.: DMKCFG 

Released by.: DMKPGS, DMKVMA 

Referenced by.: DMKATS, DMKCFF, DMKCFG, 
DMKCFH, DMKCPD, DMKPGS, DMKPTR, DMKVMA 

SPLINK 

Built BV.: N/A 

R eleased by: N/A 

Refer enced by: DMKACO, DMKCKS, DMKCQH, 
DMKCSO, DMKDBD, DMKMIA, DMKRSP, DMKSPL, 
DMKSPS, DMKTCS, DMKVSP, DMKVSQ 

STOBLOK 

Built bjr: DMKVAT 

Released by.: DMKVAT 

Referenced b_y.: DMKDSP, DMKFPS, DMKVAT 

SWPTABLE 

Built by: DMKBLD, DMKVMA 

R eleased by: DMKBLD 

Referenced b_y: DMKATS, DMKBLD, DMKCFF, 
DMKCPU, DMKPGM, DMKPGS, DMKPTR, DMKSTR, 
DMKVAT, DMKVMA 



SYSLOCS 

Assembled into CP nucleus nodule DMKSYS. 

Referenced by: DMKACO, DMKBLD, DMKCFO, 
DMKCFT, DMKCFV, DMKCKP, DMKLOC, DMKLOG, 
DMKLOH, DMKUDR, DMKDDU, DMKUSO 

SYSTBL 

Assembled into DMKSNT. 

Referenced by: DMKATS, DMKCFF, DMKCFG, 
DMKCFH, DMKCFS, DMKCKP, DMKCPU, DMKCQY 

TNSREC 

Built by: DMKIOF 
Released by: DMKIOF 
Ref erenced by: DMKIOF 

TREXT 

lUiii by: DMKTRA 

Released by: DMKTRA, DMKTRC, DMKUSO 

Referenced by: DMKCFH, DMKDSP, DMKPGS, 
DMKPRG, DMKPRV, DMKPRW, DHKSVC, DHKTMR, 
DMKTFA, DMKTRC, DMKTRD, DMKVIO 

TRQBLOK 

Sliiii hi' DMKBLD, DMKCFC, DMKCFS, 
DMKCPI, DMKGRF, DMKLOG, DMKMCC, DHKQCN, 
DMKRGA 

Released by: DMKCFH, DHKCFS, DMKDIA, 
DHKHCC, DMKLOG, DMKHON, DHKQCN, DMKRGA, 
DMKUSO 

Referenced by: DMKBLD, DMKCDS, DMKCFC, 

DMKCFM, DMKCFP, DMKCFS, DMKCPI, DMKCPU, 

DMKDIA, DMKDSP, DMKENT, DMKFPS, DMKGRF, 

DMKLOG, DMKMID, DMKHNI, DHKHON, DMKPSA, 

DHKQCN, DMKQVM, DMKRGA, DMKRGB, DMKSCH, 

DMKSSS, DMKSTP, DHKTMR, DMKUSO 

HDBFBLOK 

Built by: DMKDEF, DMKHVD, DHKSPL 

Rel eased by: DHKDEF, DHKHVD, DMKSPL 

Referenced by: DHKCFS, DMKDEG, DMKHVD, 
DMKLNK, DMKLOG, DMKSPL, DMKUDR 
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DDEVBLOK 

Built by: DMKCSP, DMKUDR 

R eleased bjr: DMKCSP, DMKUDR 

Referenced bj: DMKDEF, DMKDIR, DMKLNK, 
DMKLOG, DMKLOH, DMKSCN, DMKSSS, DMKUDR, 
DMKUDU, DMKVDA, DMKVDS 

UDIRBLOK 

Built bjr: DMKCSP 

R eleased by ; DMKCSP 

Refer enced b_y: DMKCFS, DMKCPI, DMKCSP, 
DMKDEG, DMKDIR, DMKHVD, DMKLNK, DMKLOG, 
DMKSPL, DMKDDR, DMKODU 



VDEVBLOK 



Built hi* DMKLOG, DMKVDS 



Rel eased by: DMKUSO 



Ref eren 
DMKCCH, 
DMKCKP, 
DMKCQQ, 
DMKCSU, 
DMKDGD, 
DMKGIO, 
DMKLNK, 
DMKQCN, 
DMKSSS, 
DMKONT, 
DHKVDA, 
DMKVER, 
DMKVSQ 



ced by: 
DMKCFG, 
DMKCPB, 
DMKCSB, 
DMKCSV, 
DMKDIA, 
DMKGRF, 
DMKLOG, 
DMKQVM, 
DMKTHI, 
DMKUSO, 
DMKVDC, 
DMKVIO, 



DMKACO, 
DMKCFH, 
DMKCPS, 
DMKCSP, 
DMKDAS, 
DMKDIB, 
DMKHVC, 
DMKLOH, 
DMKRGA, 
DMKTRC, 
DMKVCA, 
DMKVDD, 
DMKVSC, 



DMKALG, 
DMKCFM, 
DMKCPV, 
DMKCSQ, 
DMKDAU, 
DMKDRD, 
DMKHVD, 
DMKNLD, 
DMKSCN, 
DMKTRD, 
DMKVCH, 
DMKVDR, 
DMKVSI, 



DMKCCH, 
DMKCFP, 
DMKCQG, 
DMKCST, 
DMKDEF, 
DMKDSP, 
DHKIOS, 
DMKPRV, 
DMKSPL, 
DMKTRK, 
DMKVCN, 
DMKVDS, 
DMKVSP, 



OMACBLOK 

Built by: DMKDIR 

Released by: DMKDIR 

Referenced bj: DMKCFS, DMKDEG, DMKDIR, 
DMKHVD, DMKLOG, DMKSPL, DMKUDR, DMKUDU 



VFCBBLOK 

Built by,: DMKCFG, DMKCSO 
Rel eased by: DMKVDR 
Referenced by: DMKCSB, DMKVSP 



VCHBLOK 



Built by: DMKVDS 

Released by : DMKUSO 

Referenced by : DMKCFM, 

DMKCPB, DMKCPV, DMKCQG, 

DMKCSV, DMKDEF, DMKDEG, 

DMKFPS, DMKLNK, DMKLOG, 

DMKSCN, DMKSPL, DMKSSS, 

DMKVCN, DMKVDA, DMKVDC, 

DMKVIO, DMKVSC, DMKVSI, 



DMKCFP, 
DMKCSP, 
DMKDIA, 
DMKPRV, 
DMKUSO, 
DMKVDD, 

DMKVSP 



DMKCKP, 
DMKCSU, 
DMKDSP, 
DMKQVM, 
DMKVCH, 
DMKVDS, 



VCONCTL 



Built fry: DMKVDS 

Released by : DMKVDR 

Referenced bj: DMKALG, DMKCFP, DMKGRF, 
DMKRGA, DMKVCN, DMKVDR 



VCUBLOK 



Built by: DMKVDS 

Released by : DMKUSO 

Referenced .by: DMKCFM, 

DMKCPB, DMKCPV, DMKCQG, 

DMKCSV, DMKDEF, DMKDEG, 

DMKLOG, DMKNLD, DMKPRV, 

DMKSPL, DMKSSS, DMKUSO, 

DMKVDA, DMKVDC, DMKVDD, 

DMKVSC, DMKVSI, DMKVSP 



DMKCFP, 
DMKCSP, 
DMKDIA, 
DMKQVM, 
DMKVCH, 
DMKVDS, 



DMKCKP, 
DMKCSU, 
DMKDSP, 
DMKSCN, 
DMKVCN, 
DMKVIO, 



VMABLOK 

Built by: DMKBLD, DMKCFG 

Released by: DMKBLD, DMKPGS, DMKVMA 

Referenced by: DMKATS, DMKCFF, DMKPGS, 
DMKVMA 

VMBLOK 



Built by: DMKBLD 

Release d by: DMKBLD, 
DMKUSO 



Referenced by: 



DMKATS, 
DMKCDM, 
DMKCFG, 
DMKCFS, 
DMKCKT, 
DMKCPT, 
DMKCQP, 
DMKCSO, 
DMKCSV, 
DMKDGD, 
DMKENT, 
DMKGIO, 
DMKIOE, 
DMKISM, 
DMKLOK, 
DHKMIA, 



DMKBLD, 
DMKCDS, 
DMKCFH, 
DMKCFT, 
DMKCNS, 
DMKCPU, 
DMKCQQ, 
DMKCSP, 
DMKDAS, 
DMKDIA, 
DMKERM, 
DMKGRF, 
DMKIOF, 
DMKJRL, 
DHKMCC, 
DMKMID, 



DMKACO 
DMKCCH 
DMKCFC 
DMKCFM 
DMKCFV 
DMKCPB 
DMKCPV 
DMKCQR 
DMKCSQ 
DMKDAU 
DMKDIB 
DMKEXT 
DMKGRT 
DHKIOG 
DMKLNK 
DMKMCD 
DMKMNI 



DMKDIA, DMKLOG, 



DMKALG, 
DMKCCW, 
DMKCFD, 
DMKCFO, 
DMKCKP, 
DMKCPI, 
DMKCQG, 
DMKCQY, 
DMKciT, 
DMKDEF, 
DMKDRD, 
DMKFPS, 
DMKHVC, 
DMKIOS, 
DMKLOG, 
DMKMCH, 
DMKMON, 



DMKAPI, 
DMKCDB, 
DMKCFF, 
DMKCFP, 
DMKCKS, 
DMKCPS, 
DMKCQH, 
DMKCSB f 
DMKCSU, 
DMKDEG, 
DMKDSP, 
DMKFRE, 
DMKHVD, 
DMKIOT, 
DMKLOH, 
DMKMCT, 
DMKMOO, 
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DMKMSG, 
DMKNLE, 
DMKPGT, 
DMKPTR, 
DMKRNH, 
DMKSCN, 
DMKSPT, 
DMKSTR, 
DMKTRA, 
DMKUDU, 
DMKVCH, 
DMKVDR, 
DMKVMC, 
DMKWRM 



DMKMSW, 
DMKPAG, 
DMKPRG, 
DMKQCN, 
DMKRPA, 
DMKSEP, 
DMKSRM, 
DMKSVC, 
DMKTRC, 
DMKUNT, 
DMKVCN, 
DMKVDS, 
DMKVSC, 



DMKNES, 
DMKPER, 
DMKPRV, 
DMKQVM, 
DMKRSE, 
DMKSNC, 
DMKSSS, 
DMKTCS, 
DMKTRD, 
DMKUSO, 
DMKVDA, 
DMKVER, 
DMKVSI, 



DMKNET, 
DMKPGM, 
DMKPRW, 
DMKRGA, 
DMKRSP, 
DMKSPL, 
DMKSTK, 
DMKTHI, 
DMKTRK, 
DMKVAT, 
DMKVDC, 
DMKVIO, 
DMKVSP, 



DMKNLD, 
DMKPGS, 
DMKPSA, 
DMKRGB, 
DMKSCH, 
DMKSPS, 
DMKSTP, 
DMKTMR, 
DMKUDR, 
DMKVCA, 
DMKVDD, 
DMKVMA, 
DMKVSQ, 



VMCBLOK 

Built by: DMKVMC 
Released by: DMKVMC 
Referenced bv.: DMKDSP, DMKVMC 

VMCMHDR 

Built bv.: N/A 
R eleased by : N/A 
Referenced by: DMKMSG 

VMCPARM 

Built by : Virtual machine user 
Released by: Virtual machine user 
Referenced by: DMKVMC 

VMQBLOK 

Built by: DMKSCH 
Release d by: DMKSCH 
Refer enced by: DMKSCH, DMKSTP 

VRRBLOK 

Built by: DMKVDS 

Released by: DMKVDR 

Referenced by: DMKCCW, DMKCFP, DMKDGD, 
DMKGIO, DMKUNT, DMKVDS, DMKVSI 



VSPLCTL 

Built by: DMKDRD, DMKVSP 

Rel ea se d by: DMKVSP 

Referenced by: DMKCKP, DMKCSP, DMKCSQ, 
DMKDRD, DMKSPL, DMKVSP, DMKVSQ 



VSPXBLOK 

Built by: DMKCST 

Released by: DMKCST 

Referenced by: DMKCKP, DMKCQG, DMKCSP, 
DMKCST, DMKSPL, DMKVDR, DMKVDS 

XINTBLOK 

Built by: DMKCFP, DMKCPB, DMKDSP, 
DMKGRF, DMKRGA, DMKSCH, DMKTMR 

Released by: DMKCFP, DMKDSP, DMKSCH, 
DMKTMR 

Referenced by: DMKCFP, DMKCFS, DMKCPB, 
DMKDSP, DMKFPS, DMKGRF, DMKPSA, DMKRGA, 
DMKSCH, DMKTMR, DMKVMC 



XOBR3211 



Built by: DMKRSE 
Rel ea sed by: DMKIOE 



Refer en 
DMKCFO, 
DMKCSB, 
DMKDIB, 
DMKIOF, 
DMKMSW, 
DMKRNH, 
DMKSPL, 
DMKVCA, 



ced by: 
DMKCFP, 
DMKCSO, 
DMKEIG, 
DMKIOG, 
DMKNLD, 
DMKRSE, 
DMKSPS, 
DMKVDA, 



DMKBSC, 
DMKCNS, 
DMKDAS, 
DMKGIO, 
DMKIOS, 
DMKNLE, 
DMKRSP, 
DMKSPT, 
DMKVDC, 



DMKCCH, 
DMKCPS, 
DMKDGD, 
DMKGRF, 
DMKMNI, 
DMKRGA, 
DMKSEV, 
DMKTAP, 

DMKVDE 



DMKCCW, 
DMKCPV, 
DMKDIA, 
DMKIOE, 
DMKMON, 
DMKRGB, 
DHKSIX, 
DMKUNT, 
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CHS CONTROL BLOCK REFERENCES 



ABTAB 

Assembled as part of DMSNUC. 
Referenced b_y: DMSBAB, DMSDOS, DMSITP 

ABWSECT 

Referenced by: DMSABN, DMSDBG, DMSFRE, 
DMSITI, DMSITP, DMSITS 

ADTSECT 



Assembled as part of DMSNUC. 



Ref ere 
DMSACM 
DMSARX 
DMSBRD 
DMSDLB 
DMSERS 
DMSGND 
DMSLBM 
DMSLLD 
DMSQRY 
DMSSTT 
DMSTQQ 



AFTSECT 



n eed by ; 

, DMSALU, 

, DMSASM, 

, DMSBWR, 

- DMSDLK, 

, DMSEXC, 

, DMSIFC, 

, DMSLBT, 

, DMSLST, 

, DMSRNM, 

, DMSSVT, 

, DMSTRK, 



DMSABN, 
DMSAMS, 
DMSASN, 
DMSCMP, 
DMSDOS, 
DMSEXT, 
DMSINS, 
DMSLDS, 
DMSMOD, 
DMSROS, 
DMSTMA, 
DMSUPD, 



DMSACC, 
DMSARE, 
DMSAUD, 
DMSCPY, 
DMSDSK, 
DMSFNS, 
DMSLAD, 
DMSLFS, 
DMSMVE, 
DMSSET, 
DMSTPE, 

DMSXCP 



DMSACF, 
DMSARN, 
DMSBOP, 
DMSDIO, 
DMSDSL, 
DMSFOR, 
DMSLAF, 
DMSLKD, 
DMSPUN, 
DMSSOP, 
DMSTPF, 



Assembled as part of DMSNUC; also 
created and released dynamically by 
DMSLAF. 

Referenced by: DMSBRD, DMSBWR, DMSERS, 
DMSINT, DMSLAF, DMSPNT, DMSRNM, DMSSOP, 
DMSSTT, DMSTPE 



ANCHSECT 

Built by: DMSSTG 
R elease d by : Not released 
Referenced b_y: DMSDOS, DMSSTG 

EATLSECT 

Assembled as part of DMSBTP. 
Refer enced by: DMSCIO, DMSITE, DMSPIO 



BBOX 

Assembled as part of DMSNUC. 

R eferenced by: DMSSTG. This block is 
used by the DOS supervisor. 



BGCOM 



Assembled as part of DMSNUC. 

Referenced by: DMSAMS, DMSASN, DMSBAB, 

DMSBOP, DMSCLS, DMSDLB, DMSDLK, DMSDMP, 

DMSDOS, DMSDSV, DMSFCH, DMSFET, DMSINS, 

DMSITP, DMSLLU, DMSOPL, DMSOPT, DMSPRV, 

DMSQRY, DMSRRV, DMSSET, DMSSMN, DMSSRV, 

DMSSTG, DMSVSR, DMSXCP 



CMSTAXE 

Built by: DMSSVT 

R elea sed by: DMSSVT 

Referenced by: DMSCIT, DMSITI, DMSSVT 

CVTSECT 

Assembled as part of DMSNUC. 
Referenced by: DMSINS 

DBGSECT 

Assembled as part of DMSNUC. 
Referenced by: DMSDBD, DMSDBG, DMSITE. 

DEVSECT 

Assembled as part of DMSNUC. 

Referenced by: DMSTIO, DMSTLB, DMSTPE, 
DMSTPF, DMSTPG 

DEVTAB 

Assembled as part of DMSNUC* 

R eferenced by: DMSASN, DMSDBD, DMSEDI, 
DMSEDX, DMSINI, DMSIOH, DMITI, DMSLLU, 
DMSSVT 
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DIOSECT 

Assembled as part of DMSNOC. 

Referenced bj: DMSACM, DMSDIO, DMSFNS, 
DMSITI 

DMSCCB 

Bui lt by: N/A 
Released by: N/A 
Referenced by: DMSXCP 

DOSSECT 

Built by.: DMSDLB 

Released by.: DMSDLB, DMSABN 

Refer enced by.: DMSAMS, DMSBOP, DMSCLS, 

DMSDLB, DMSDLK, DMSDOS, DMSDSV, DMSFCH, 

DMSOPL, DMSQRY, DMSROS, DMSRRV, DMSSRV, 

DMSSVT, DMSVIP, DMSXCP 

EDCB 

Built by: DMSEDX 

Released by: DMSEDI 

Refe renced b_y: DMSEDC, DMSEDI, DMSEDX, 
DMSGIO, DMSSCR 

ERDSECT 

Assembled as part of DMSNUC. 
Referenced by: DMSERR 

EXTSECT 

Assembled as part of DMSNOC. 

Referenced b_y: DMSINS, DMSINT, DMSIOW, 
DMSITE, DMSQRY, DMSSET, DMSSTG, DMSSVN, 
DMSSVT 

EXTUAREA 

Assembled as part of DMSNUC. 
R eleased by: N/A 
No CMS references. 



FCBSECT 

Built by: DMSFLD 

Released by: DMSFLD, DMSABN 

Referenced by: DMSALU, DMSARN, DMSARX, 

DMSASM, DMSDSL, DMSFCH, DMSFLD, DMSLBD, 

DMSLDS, DMSMVE, DMSQRY, DMSROS, DMSSAB, 

DMSSBD, DMSSBS, DMSSCT, DMSSEB, DMSSOP, 

DMSSQS, DMSSVN, DMSSVT, DMSTLB 

FCHTAB 

Assembled as part of DMSNUC. 
Referenced by: DMSDOS, DMSFET 

FICL 

Assembled as part of DMSNUC. 

Referenced by: No CMS references. This 
block is used by the DOS supervisor. 

FRDSECT 

Assembled as part of DMSNUC. 

Referenced by: DMSFRE, DMSSET 



FSCBD 



Built by: N/A 

R eleased by: N/A 

Referenced by: DMSBRD, DMSDLK, DMSERS, 
DMSIFC, DMSUPD, DMSZAP, and user 
programs that access the CMS file 
system. 



FSTD 



Built by: N/A 

Released by: N/A 

Referenced by: DMSCPY, DMSEDI, DMSEDX, 

DMSEXC, DMSFNS, DMSGND, DMSLAD, DMSLBT, 

DMSLST, DMSNCP, DMSSOP, DMSTPE, DMSTPF, 

DMSTPG, DMSTYP, DMSUPD 



FSTSECT 



lUiii by: DMSACF 

Relea se d by: DMSALU 

Referenced by: DMSACF, DMSAMS, DMSARN, 

DMSARX, DMSASM, DMSBOP, DMSBRD, DMSBHR, 

DMSCPY, DMSDLK, DMSDSK, DMSDSL, DMSERS, 

DMSIFC, DMSLAF, DMSLBM, DMSLKD, DMSMDP, 

DMSMVE, DMSRNM, DMSSTT, DMSTPE, DMSUPD, 
DMSZAP 
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FVSECT 



Assembled as part of DMSNDC. 



Referenced by : 
DMSACM, DMSALU, 
DMSAUD, DMSBRD, 
DMSCIT, DMSCMP, 
DMSDIO, DMSDOS, 
DMSERS, DMSFNS, 
DMSITI, DMSITP, 
DMSLFS, DMSMOD, 
DMSRNM, DMSSLN, 
DMSTPF, DMSTPG, 



DMSABN, 
DMSARN, 
DMSBTB, 
DMSCRD, 
DMSDSK, 
DMSGND, 
DMSITS, 
DMSPNT, 
DMSSOP, 
DMSTQQ, 



DMSACC, 
DMSARX, 
DMSBTP, 
DMSCWR, 
DMSDSL, 
DMSINT, 
DMSLAD, 
DMSPUN, 
DMSSTT, 

DMSUPD 



DMSACF, 
DMSASM, 
DMSBWR, 
DMSCWT, 
DMSERD, 
DMSITE, 
DMSLBM, 
DMSQRY, 
DMSTPE, 



IHADECB 



Built b_y: N/A 

Released by ; N/A 

Referenced by: 
DMSSEB, DMSSVT 



DMSSBD, DMSSBS, DMSSCT, 



IOSECT 

Assembled as part of DMSNUC. 

Referenced b_y: DMSABN, DMSHDI, DKSINT, 
DMSITI 

KEY SECT 

Built by: DMSSVT 
Released by : DMSSVT 
Referenced by: DMSSBD, DMSSVT 

LABSECT 

Bu ilt by.: DMSLBD 

Relea sed bjy: DMABN, DMSLBD 

Referenced bj: DMSFLD, DMSLBD, DMSQRY, 
DMSTLB 

LDRST 

Built by: DMSLDR 

R eleased by: DMSLDR 

Referenced by.: DHSLDK, DMSLGT, DMSLIB, 
DMSLIO, DMSLSB, DMSOLD 

LIBSECT 

Assembled as part of the LIB macro. 

Referenced b_y: DMSLBM, DMSLGT, DMSLIB, 
DMSPRT DMSPUN, DMSSVT, DMSTMA, DMSTYP 



LUBPR 

Assembled as part of DMSNDC. 

Referenced by: DMSAMS, DMSBOP, DMSCLS, 

DMSDLB, DMSDLK, DMSDSV, DHSFCH, DMSLLU, 

DMSOPL, DMSPRV, DMSRRV, DMKSET, DMSSRV, 
DMSXCP 

LUBTAB 

Assembled as part of DMSNUC. 

Referenced by: DMSAMS, DMSBOP, DMSCLS, 
DMSDLB, DMSFCH, DMSLLU, DMSOPL, DMSPEV, 
DMSRRV, DMSSET, DMSSRV, DMSXCP 

NICL 

Assembled as part of DMSNUC. 

Referenced by: DMSBOP, DMSCLS, DMSDLB, 
DMSDLK, DMKDOS, DMSDSV, DMSLLU, DMSPRV, 
DMSXCP 



NUCON 



•b»3 ^lu JJj» ^ii GL«9 paj.u Ji. yuijuuu* 



Peferen 

DMSACM 

DMSARX 

DMSBOP 

DMSCAT 

DMSCPF 

DMSDBD 

DMSDMP 

DMSEDI 

DMSEXC 

DMSFNS 

DMSGND 

DMSIFC 

DMSINT 

DMSITS 

DMSLBT 

DMSLIB 

DMSLSB 

DMSMVE 

DMSOR1 

DMSPRT 

DMSRNE 

DMSSBS 

DMSSLN 

DMSSRV 

DMSSVT 

DMSTMA 

DMSTQQ 

DMSVIP 



ced by: 
DMSALU 
DMSASM 
DMSBRD 
DMSCIO 
DMSCPY 
DMSDBG 
DMSDOS 
DMSEDX 
DMSEXT 
DMSFOR 
DMSHDI 
DMSINA 
DMSIOW 
DMSLAD 
DMSLDR 
DMSLIO 
DMSLST 
DMSNCP 
DMSOVR 
DMSPRV 
DMSRNM 
DMSSCN 
DMSSMN 
DMSSSK 
DMSSYN 
DMSTPD 
DMSTRK 
DMSV5R 



DMSABN 
DMSAMS 
DMSASN 
DMSBTB 
DMSCIT 
DMSCRD 
DMSDIO 
DMSDSK 
DMSERD 
DMSFCH 
DMSFRE 
DMSHDS 
DMSINI 
DMSITE 
DMSLAF 
DMSLDS 
DMSLKD 
DMSLSY 
DMSOLD 
DMSOVS 
DMSPUN 
DMSROS 
DMSSCT 
DMSSOP 
DMSSTG 
DMSTIO 
DMSTPE 
DMSTYP 
DMSXCP 



DMSACC, 
DMSARE 
DMSAUD 
DMSBTP 
DMSCLS 
DMSCWR 
DMSDLB 
DMSDSL 
DMSERR 
DMSFET 
DMSGIO 
DMSHLI 
DMSINM 
DMSITI 
DMSLBD 
DMSLFS 
DMSLLU 
DMSMDP 
DMSOPL 
DMSPIO 
DMSQRY 
DMSRRV 
DMSSEB 
DMSSQS 
DMSSTT 
DMSTLA 
DMSTPF 
DMSUPD 

DMSZAr 



DMSACF, 
DMSARN, 
DMSBAB, 
DMSBWR, 
DMSCMP, 
DMSCWT, 
DMSDLK, 
DMSDSV, 
DMSERS, 
DMSFLD, 
DMSGLB, 
DMSHLS, 
DMSINS, 
DMSITP, 
DMSLBM, 
DMSLGT, 
DMSLOA, 
DMSMOD, 
DMSOPT, 
DMSPNT, 
DMSRDC, 
DMSSAB, 
DMSSET, 
DMSSRT, 
DHSSVN, 
DMSTLB, 
DMSTPG, 
DMSVIB, 



OPSECT 

Assembled as part of DMSNUC. 

Referenced by: DMSABN, DMSARX, DMSASM, 
DMSCPY, DMSCRD, DMSCWR, DMSCWT, DMSDBG, 
DMSEXC, DMSEXT, DMSINS, DMSINT, DMSROS, 
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DMSSBD, DMSSBS, DMSSCT, DMSSEB, DMSSOP, 
DMSSQS, DMSSVN, DMSSVT 



OSFST 

Built by: DMSROS 

Released by: DMSALO 

Referenced bj: DMSABN, DMSALU, DMSBOP, 
DMSDLK, DMSDSV, DMSFCH, DMSMVE, DMSOPL, 
DMSROS, DMSRRV, DMSSOP, DMSSRV, DMSSTT 

OVSECT 

Built bv.: N/A 

R eleased by : N/A 

Refer enced b_y: DMSITS, DMSOVR 

PCTAB 

Assembled as part of DMSNUC. 
Referenc ed b_y: DMSBAB, DMSDOS, DMSITP 

PDSSECT 

Built by.: DMSSVT 

R eleased by: DMSSVT 

R efer en ced bv.: DMSSBS, DMSSTG, DMSSVT 

PGMSECT 

Assembled as part of DMSNOC. 

Referenced bv.: DMSITP, DMSSAB, DMSSLN, 
DMSSTG, DMSSVT 



E§Ie£enced by: DMSBOP, DMSCLS, DMSDLK, 
DMSDOS, DMSDSV, DHSLLU, DMSPRV, DMSRRV, 
DMSSRV, DMSXCP 



POBOWNER 

Assembled as part of DMSNOC. 

Referenced by: DMSBOP, DMSCLS, DMSDLK, 
DHSLLD, DMSXCP 



SSAVE 



Built by: DMSITS 

R eleased by: DMSITS 

Referenced by: DMSABN, DMSACC, DMSBAB, 

DMSBOP, DMSCLS, DMSDBG, DMSDLB, DMSDOS, 

DMSERR, DMSFLD, DHSFRE, 

DMSITS, DMSLDR, DMSOVS, 

DMSSMN, DMSSOP, DMSSTG, 

DMSTBL, DMSVIP, DMSXCP 



DMSIFC, DMSITP, 
DMSSAB, DMSSLN, 
DMSSVN, DMSSVT, 



SOBSECT 

Assembled as part of DMSNOC. 
Referenced By: DMSABN, DMSINM, DMSINT 

SVCSECT 

Asseabled as part of DMSNOC. 

Referenced by: DMSCIT, DHSFRE, DMSHDS, 
DMSINT, DMSITE, DMSITS, DMSLAD, DMSLFS, 
DMSOVR, DMSOVS, DMSSLN 

SVEARA 

Assembled as part of DMSNOC. 
Referenced by: DMSBAB, DMSDOS, DMSITP 



PIBADR 

Assembled as part of DMSNOC. 
Referenced bjj: DMSBAB, DMSDOS, DMSITP 

PIB2TAB 

Assembled as part of DMSNOC. 
Referenc ed by: DMSDOS, DMSVSR 

POBADR 

Assembled as part of DMSNOC. 



SYSCOH 

Assembled as part of DMSNOC. 

Referenced by: DMSBAB, DMSBOP, DMSDOS, 
DMSFET, DMSITP, DMSQRY, DMSSTG, DMSSYN 

SYSNAMES 

Assembled as part of DMSNOC. 

Referenced by: DMSAMS, DMSBOP, DMSBPT, 
DMSDOS, DMSEDX, DMSEXC, DMSINS, DMSINT, 
DMSITS, DMSQRY, DMSSET, DMSVIB, DMSVSR 
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TLBBLOK DSAVE 

Built by : DK3BGF, DM5CL3, DM53EE, Built b y: H/A 
DMSSOP, DMSTLB, DMSTMA, DMSTPD 

R eleased by: N/A 
Released by.: DMSBOP, DMSCLS, DMSSEB, 
DMSSOP, DMSTLB, DMSTMA, DMSTPD Referenced by: DMSITS 

Referenced bjr: DHSBOP, DMSCLS, DMSSEB, 

DMSSOP, DMSTLB, DMSTMA, DMSTPD DSERSECT 

Assembled as part of DMSNOC, 
TSOBLKS 

Released by: N/A 
Assembled as part of DMSNUC. 

No CMS references. 
Referenced by: DMSSET 
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RSCS CONTROL BLOCK REFERENCES 



ASYNE 

Built by: DMTASY 

Released by: DMTASY, DMTASK 

Refer enced bj: DMTASY, DMTEXT, DMTIOH, 
DMTSIG 



our uon^i: 

Built by: DMTSML 
Relea sed by: DMTSML 
Referenced by; DMTSML 

COMDSECT 

Built by: DMTCOM 

R eleased by: N/A 

Referenced b_y: DMTAXS, DMTCMX, DMTMGX, 
DMTNPT, DMTREX, DMTSML 



GIVEE 

Built by: DMTGIV 

Released by: DMTAKE, DMTASK 

Referenced by: DMTAKE, DMTASK, DMTGIV 



IOE 



Built py: unxjLun 

Released by: DMTIOM 

Referenced by: DMTASK, DMTIOM, DMTREX 



IOTABLE 



Built by: DMTIOM, 
DMTREX, DMTSML 



DMTCRE, DMTNPT, 
Released by: DMTNPT, DMTSML 



Referenced by: DMTAXS, DMTCMX, DMTCRE, 
DMTINI, DMTIOM, DMTREX, DMTSML 



DEVTABLE 

Built by: DMTNPT 
Released by: DMTNPT 
Referenced by : DMTNPT 

FREEE 

Built by: DMTQRQ 

R eleased by: DMTQRQ 

Referenced b_y: DMTASK, DMTINI, DMTQRQ 



LINKTABL 



GIVE 



Built by: DMTSML, DMTNPT, DMTAXS, DMTREX 
Released by : 
Referenced by: 



Assembled into DMTSYS at system 
generation; also built by DMTCMX* 

Released by: DMTCMX 

Referenced, by: DMTASY, DMTAXS, DMTCMX, 
DMTCOM, DMTCRE, DMTEXT, DMTLAX, DMTMGX, 
DMTNPT, DMTREX, DMTSML 



REQBLOCK 

Built by: DMTNPT 
Released by: DMTNPT 
Referenced by: DMTNPT 

ROUTE 

Assembled in DMTSYS 
R eleased by: 
Referenced by : DMTAXS 
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SVECTOES 



Assembled into DMTVEC at system 
generation; resides in the RSCS nucleus. 

Referenced b_y: DMTAKE, DMTASK, DMTASY, 

DMTAXS, DMTCMX, DMTCOM, DMTCRE, DMTDSP, 

DMTEXT, DMTGIV, DMTINI, DMTIOM, DMTLAX, 

DMTMGX, DMTNPT, DMTQRQ, DMTREX, DMTSIG, 
DMTSML, DMTSTO, DMTSVC, DMTWAT 



TAG 



Built b_y: DMTAXS 

Released b_y: DMTAXS 

Eeferenced bj: DMTAXS, DMTCMX, DMTNPT, 
DMTSML 



TAGAREA 

Built by.: DMTAXS 
R elease d by: N/A 
Referenced by : DMTAXS 



TANKDSEC 

SSiii by: DMTSML 
Released by.: DMTSML 
Referenced by: DMTSML 

TARE A 

Assembled into each task module. 

Rele ased by: DMTASK Referenced by: 

DMTAKE, DMTASK, DMTASY, DMTCOM, DMTCRE, 

DMTDSP, DMTEXT, DMTGIV, DMTIOM, DMTREX, 

DMTSIG, DMTSTO, DMTSVC 

TASKE 

Built by: DMTASK 

Released by: DMTASK 

Referenced by: DMTAKE, DMTASK, DMTASY, 

DMTAXS, DMTCOM, DMTDSP, DMTEXT, DMTGIV, 

DMTINI, DMTIOM, DMTNPT, DMTPST, DMTREX, 

DMTSIG, DMTSML, DMTSTO, DMTSVC, DMTWAT 

TCTDSECT 

Built by: DMTSML 
Released by: DMTSML 
R eference d by: DMTSML 
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